| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Рисование на канве ячеект и вставка текста: траблы :( [D7, WinXP]
MadGhost © (2004-07-06 10:20:00)Рисую я на TImage скажем ячейки, имхо мне картинку надо отрисовать в виде отчета, имхо мне нужно нарисовать таблицу. а где это будет мне по барабану ;) в StringGrid долго разбираться с объединением ячеек.
Легче все самому отрисовать мне кажется, хотя может и ошибаюсь )
Так вот, рисую:
var
rect:TRect;
begin
rect.Top:=0;
rect.Left:=0;
rect.Right:=80;
rect.Bottom:=20;
Image1.Canvas.Brush.Color(0,255,0);
Image1.Canvas.Rectangle(rect);
Image1.Canvas.TextRect(rect,0,20,'Grid1');
вот, и ячейка которая имела до этого рамку :( пропадает, и остается обычный зеленый квадратик. Как нарисовать вокруг TRect рамку.
Заранее благодарен.
MadGhost (2004-07-06 13:27:00) [1]большое спасибо )))
Леприкон (2004-07-06 12:09:00) [2]Canvas.Brush.Color:=RGB(0,255,0);
Canvas.TextRect(rect,rect.Left,rect.Top,'Grid1');
Canvas.Brush.Color:=clblack;
Canvas.FrameRect(rect);
Amoeba (2004-07-06 11:51:00) [3]Зачем такой геморой? Используй лучше QReport.
| |
