Форум: "Базы";
Текущий архив: 2003.03.13;
Скачать: [xml.tar.bz2];
Вниз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. Посмотри по форуму примеры есть точно
← →
sniknik (2003-02-21 15:40) [4]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;
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2003.03.13;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.011 c