Цвет в dbgrideh
Добавлено: 25 мар 2006, 16:15
Стоит Dbgrideh
есть table куда во время работы записываются данные
Каким образом можно пометить (дать какое-то значание)опредленню строчку, чтоб в последствии ее закрасить
Делаю так при добовлении строки в бд
RxData.Fields[0].AsString := 'Пример';
RxData.Fields[0].Tag:=999;
Потом в dbgrifeh
procedure TFrmGenMain.DBGridGetCellParams(Sender: TObject;
Column: TColumnEh; AFont: TFont; var Background: TColor;
State: TGridDrawState);
begin
if Column.Field.DataSet.Fields[0].Tag=999 then background:=clgreen;
end;
Но почему-то не работает
есть table куда во время работы записываются данные
Каким образом можно пометить (дать какое-то значание)опредленню строчку, чтоб в последствии ее закрасить
Делаю так при добовлении строки в бд
RxData.Fields[0].AsString := 'Пример';
RxData.Fields[0].Tag:=999;
Потом в dbgrifeh
procedure TFrmGenMain.DBGridGetCellParams(Sender: TObject;
Column: TColumnEh; AFont: TFont; var Background: TColor;
State: TGridDrawState);
begin
if Column.Field.DataSet.Fields[0].Tag=999 then background:=clgreen;
end;
Но почему-то не работает