Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.01.31;
Скачать: CL | DM;

Вниз

Выделение строки DBGrid цветом   Найти похожие ветки 

 
Havez ©   (2002-01-13 18:45) [0]

Добрых времён!. Подскажите, как мне раскрашивать фон строки в DBGrid, в зависимости от значения некоторого поля таблицы БД?


 
Quest ©   (2002-01-14 09:52) [1]

procedure TForm1.DBGrid2DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
With (Sender as TDBGrid).Canvas Do Begin
IF (Not (gdFocused in State)) AND
((Sender as TDBGrid).DataSource.DataSet.FieldByName("Field_Name").AsBoolean=False)
Then Begin
Font.Color:=clWhite;
Brush.Color:=clRed;
FillRect(Rect);
TextOut(Rect.Left,Rect.Top,Column.Field.Text);
End
Else
(Sender as TDBGrid).DefaultDrawColumnCell(Rect,DataCol,Column,State);
End;
End;


 
Havez ©   (2002-01-15 14:26) [2]

Спасибо, попробую.



Страницы: 1 вся ветка

Текущий архив: 2002.01.31;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.01 c
1-99956
MystiX
2002-01-13 18:02
2002.01.31
Heeelp!!!


1-99950
dim2001
2002-01-13 20:28
2002.01.31
Запись в файл


6-100026
Диман
2001-11-09 12:18
2002.01.31
модуль Winsock - функции socket, connect и т.п.


14-100053
Arhelon
2001-12-10 08:29
2002.01.31
Помогите плз с Аьской (ActiveList)


14-100042
VEG
2001-12-07 19:53
2002.01.31
Скоро Новый Год: Пора делать предновогодние версии своих программ...