Текущий архив: 2002.12.19;
Скачать: CL | DM;
Вниз
Как изменить цвет строки в DBgrid? Найти похожие ветки
← →
Levsha (2002-12-09 22:44) [0]и вообще возможно ли это?
если невозможно то хотябы подскажите другой вариант спасибо
← →
Shrek © (2002-12-10 04:38) [1]сер почаще нажимайте F1.
прямо из хелпа
procedure TForm1.DBGrid1DrawDataCell(Sender: TObject; const Rect: TRect; Field: TField; State: TGridDrawState);
begin
if Table1.FieldByName("Size").AsFloat > 10 then
DBGrid1.Canvas.Font.Color := clRed;
DBGrid1.DefaultDrawDataCell(Rect, Field, State);
end;
← →
Levsha (2002-12-10 06:48) [2]А ты сам хоть раз пробовал это реализовать?
чтото у меня не пашет :(
procedure TMainAppForm.dbgActiveOrdersDrawDataCell(Sender: TObject;
const Rect: TRect; Field: TField; State: TGridDrawState);
begin
if DM.IBDataSet.FieldByName("DEADLINE_DATE").AsDateTime <= Now then
dbgActiveOrders.Canvas.Font.Color := clRed;
dbgActiveOrders.DefaultDrawDataCell(Rect, Field, State);
end;
← →
Наталия © (2002-12-10 06:58) [3]Этот код опробован многократно :), так что проблема только в тебе. Может, у тебя условие не выполняется.
Страницы: 1 вся ветка
Текущий архив: 2002.12.19;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.029 c
