| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
DBGrid [D5]
VIB © (2003-02-21 15:14:00)Как рисовать в DBGride
sniknik (2003-02-21 15:40:00) [1]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;
roadrunner (2003-02-21 15:37:00) [2]если просто поменять цвет, там или ввывести как-нить текст по вычурнотому смотри событие OnDrawColumnCell. Посмотри по форуму примеры есть точно
___ALex___ (2003-02-21 15:26:00) [3]получи его описатель контекста устройства и рисуй что хочешь
Johnmen (2003-02-21 15:25:00) [4]Прошу прощения, но позволю себе заметить, что без знания/понимания азов приступать к разработки своих компонент, по меньшей мере, опрометчиво...
| |
