Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как раскрасить строку в dbgrid? [D7]


Ann_k ©   (2004-09-27 13:51:00) 

Есть dbgrid и в нем надо раскрасить фон некоторых строк цветом.
Помогите,pls!Не могу разобраться, как пользоваться ВrawСolumnCell-ом для раскраски ячейки.
Спасибо!


Ann_k   (2004-09-27 14:05:00) [1]

Amoeba, alless, спасибо!


alless   (2004-09-27 13:53:00) [2]

Установите рисование по умолчинию (Default drawing) в True. Только после этого можно нарисовать выделенную ячейку. Если вы установили DefaultDrawing в False, вы должны сами рисовать все ячейки, используя свойство Canvas.

Procedure TForm1.DBGrid1DrawDataCell(Sender: TObject; const Rect: TRect;
Field: TField; State: TGridDrawState);

begin

If gdFocused in State then
with (Sender as TDBGrid).Canvas do
begin

Brush.Color := clRed;
FillRect(Rect);
TextOut(Rect.Left, Rect.Top, Field.AsString);

end;

end;


Amoeba   (2004-09-27 13:52:00) [3]

Читай статью "Разноцветный DBGrid" на http://www.delphikingdom.com


Наверх

Титульная страница Поиск, карта сайта Написать письмо