Форум: "Базы";
Текущий архив: 2003.08.28;
Скачать: [xml.tar.bz2];
Вниз
Как изменить цвет одной ячейки в DBGrid Найти похожие ветки
← →
murtazi (2003-08-01 17:20) [0]Как изменить цвет одной ячейки в DBGrid
← →
horse (2003-08-01 17:59) [1]Изменит все ячейки поля FieldName, значения к-рых < 0
procedure ToRest.DBGridEh1DrawColumnCell(Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumnEh;
State: TGridDrawState);
begin
if Column.FieldName = "FieldName" then
if Column.Field.AsFloat < 0 then
( Sender) Изменит все ячейки поля FieldName, значения к-рых < 0
procedure ToRest.DBGridEh1DrawColumnCell(Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumnEh;
State: TGridDrawState);
begin
if Column.FieldName = "FieldName" then
if Column.Field.AsFloat < 0 then
TDBGridEh(Sender).Canvas.Brush.Color := clRed;
TDBGridEh(Sender).DefaultDrawColumnCell(Rect,DataCol,Column,State);
end;
← →
murtazi (2003-08-01 18:11) [2]Большое Спасибо!
← →
ulyanitsky (2003-08-01 20:07) [3]А в стандартном DBGRID как?
← →
Hawk2 (2003-08-01 23:49) [4]Также, только событие будет называться DBGrid1DrawColumnCell и т.д.
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2003.08.28;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.006 c
