Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 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.012 c
3-61441
Arkady
2002-11-27 13:08
2002.12.19
Соединение с InterBase


4-61891
Pumpkin
2002-11-04 23:09
2002.12.19
Как в Delphi-шной программе заменить STUB


1-61660
dkDimon
2002-12-08 01:13
2002.12.19
PopUp Menu


14-61759
ЮРИЙ_К
2002-11-20 16:21
2002.12.19
Удалить счетчик шарной программы


3-61490
delta
2002-12-02 14:34
2002.12.19
SQL запрос