![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как изменить цвет текста в DBGrid? [D5, IB6.x]
viper © (2002-12-23 17:27:00)Есть заполненая таблица, и мне нужно некоторые строки выделить другим цветом, т.е. если тип(такое поле) этой записи 1 то скажем строка красным цветом! Если можно, то кинте кусочек кода!
Леший (2002-12-23 17:39:00) [1]with DBGrid1.Canvas do
begin
if (Column.Field.FieldName = "CLOSE") and
not (gdSelected in State) then
if strtofloat(Column.Field.Text)<0 then
begin
Brush.Color:=clRED;
Font.Color:=clWHite;
FillRect(Rect);
TextOut(Rect.Left+2,Rect.Top+2,FormatFloat("### ### ###.##",StrToFloat(Column.Field.Text)));
exit;
end;
DBGrid1.DefaultDrawColumnCell(Rect, DataCol, Column, State)
end;
Delirium^.Tremens (2002-12-23 17:28:00) [2]OnDrawColumnCell + FAQ