| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Разноцветные ячейки в DBGRID. Проблема... [D5, D6]
SergP © (2004-04-05 14:04:00)Делаю приблизительно так:
procedure TFormUsers.DBGrid1DrawDataCell(Sender: TObject;
const Rect: TRect; Field: TField; State: TGridDrawState);
begin
if (Field.FieldName = 'regtime') and (Field.AsInteger>1080000000)then
begin
DBGrid1.Canvas.Brush.Color := clRed;
DBGrid1.Canvas.Font.Color := clblue;
end;
DBGrid1.DefaultDrawDataCell(Rect, Field, State);
end;
В обычном варианте работает, но если я в DBGRID создаю columns'ы, чтобы отображать только те поля которые я хочу и задать некоторые другие параметры (например ширину ячейки и пр.), то этот код вообще не действует.
Что делать в таком случае? Как сделать чтобы работало?
Соловьев (2004-04-05 14:08:00) [1]
> но если я в DBGRID создаю columns'ы
как?
Vlad (2004-04-05 14:07:00) [2]
> SergP © (05.04.04 14:04)
Пользуйся OnDrawColumnCell
| |
