БОЛЬШОЙ FAQ ПО DELPHI



Рисование на GroupBox

Автор: Ralph Friedman

Я хочу рисовать на холсте (Canvas) моего компонента GroupBox. Но когда я пробую рисовать на Component.Parent.Canvas, рисование происходит на форме, а не на моем компоненте GroupBox. Что я делаю неправильно?

Canvas - защищенное свойство TGroupBox и, поэтому, недоступное. Вы можете сделать его доступным следующим образом:


 type
   TMyGroupBox = class(TGroupBox)
     public
       property Canvas;
   end;
 
 procedure SomeProcedure;
 begin
   ...
   with TMyGroupBox(GroupBox1).Canvas do
     CopyRect(ClipRect, Image1.Canvas, ClipRect);
   ...
 end;
 




<< ВЕРНУТЬСЯ В ОГЛАВЛЕНИЕ



Материалы находятся на сайте https://exelab.ru/pro/



Видеокурс ВЗЛОМ