![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как раскрасить строку в 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