это можно сделать только с помощью скрипта, пример:
// событие OnAfterClick кнопки поиска
procedure Form1_bSearch_OnAfterClick (Sender: string);
var
i,c: integer;
begin
c := Form1.TableGrid1.RowCount-1; // получаем количество строк в гриде
for i := 0 to c do // цикл перебора всех строк
begin
// красим ячейку в зависимости от текста в ней, в колонке 7
if Form1.TableGrid1.Cells[7,i] = 'Принято' then Form1.TableGrid1.Cell[1,i].Color := clYellow;
if Form1.TableGrid1.Cells[7,i] = 'Ремонтируется' then Form1.TableGrid1.Cell[1,i].Color := clRed;
if Form1.TableGrid1.Cells[7,i] = 'Готов' then Form1.TableGrid1.Cell[1,i].Color := clGreen;
end;
end;
как видно, красятся ячейки только по нажатию на кнопку Поиск.
перед использование данного скрипта, скачайте последнюю неофициальную версию 1.41
https://www.dropbox.com/s/fr76z69sc69l1 … 201.41.zip
Dmitry.