![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
TPanel
GSS © (2004-09-09 21:45:00)Как на нем рисовать, или как на нем рисует Tchart
(он, вроде, на TPanel основан)
GSS (2004-09-10 00:53:00) [1]Понятно...
Юрий Зотов (2004-09-09 22:27:00) [2]> GSS (09.09.04 22:05) [3]
> у самого TPanel нет canvas
Есть, только она в protected. Код, который я привел в [2] как раз и дает доступ к protected.
GSS (2004-09-09 22:09:00) [3]Спасибо Юрий Зотов, буду пробовать !
GSS (2004-09-09 22:05:00) [4]у самого TPanel нет canvas но есть brush.canvas - короче пишет ошибку (на image я знаю как рисовать)
Юрий Зотов (2004-09-09 22:04:00) [5]type
TFriendPanel = class(TPanel);
procedure DrawOnPanel(Panel: TPanel);
begin
with TFriendPanel(Panel).Canvas do
begin
... // И рисуем на этом Canvas'е все, что только захотим
end
end;
DVM (2004-09-09 21:55:00) [6]
> Как на нем рисовать, или как на нем рисует Tchart
У многих компонентов есть канва (Canvas), у канвы соответствующие методы.