Главная страница
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.015 c
3-61403
BorisUK
2002-11-21 12:04
2002.12.19
Опять Вопрос по EhLib.... ПРО СОРТИРОВКУ ЛОКАЛЬНО!!!!


1-61601
olden
2002-12-06 18:56
2002.12.19
как избежать прокрутки комбобокса колесом мышки


3-61480
Tlotr
2002-11-29 14:43
2002.12.19
Редактирование calculated-поля в гриде


14-61797
Kurt
2002-11-28 15:48
2002.12.19
Люди! Как мне посмотреть исходники АДО-шых компонентов?


1-61619
ACR
2002-12-06 21:12
2002.12.19
выделение текста в TWebBrowser