DBGrid

← →
VIB (2003-02-21 15:14) [0]

Как рисовать в DBGride

← →
Johnmen © (2003-02-21 15:25) [1]

Прошу прощения, но позволю себе заметить, что без знания/понимания азов приступать к разработки своих компонент, по меньшей мере, опрометчиво...

← →
___ALex___ © (2003-02-21 15:26) [2]

получи его описатель контекста устройства и рисуй что хочешь

← →
roadrunner (2003-02-21 15:37) [3]

если просто поменять цвет, там или ввывести как-нить текст по вычурнотому смотри событие OnDrawColumnCell. Посмотри по форуму примеры есть точно

DBGride как и многие компоненты имеет Canvas.

пример кстати из Help-а (все знания оттуда остальное вторично :о))) читай его внимательней.

The following code uses the bitmaps in an image list component to draw the contents of each cell in a draw grid. It draws a focus rectangle around the cell that has focus.

procedure TForm1.DrawGrid1DrawCell(Sender: TObject; Col, Row: Longint; Rect: TRect; State: TGridDrawState);
var
index: integer;
begin
index := Row * DrawGrid1.ColCount + Col;
with Sender as TDrawGrid do
begin
Canvas.Brush.Color := clNormalBackGround;
Canvas.FillRect(Rect);
ImageList1.Draw(Canvas,Rect.Left,Rect.Top,index);
if gdFocused in State then
Canvas.DrawFocusRect(Rect);
end;

end;

DBGrid Найти похожие ветки