Форум: "Media";
Текущий архив: 2002.10.10;
Скачать: [xml.tar.bz2];
ВнизРисование в контроле Найти похожие ветки
← →
Ocean (2002-06-10 17:58) [0]Например, в TButton по событию click хотелось бы нарисовать что-нибудь. А можно ли рисовать в экране?
← →
Song (2002-06-10 21:49) [1]Рисовать можно что угодно и где угодно. Выбирай в классе TCanvas
← →
Ocean (2002-06-11 10:30) [2]В TButton, как и в TScreen, нет Canvas.
Я пробовал так:
Var DC : hDC;
C : TCanvas;
DC := GetDC(Button1.Handle);
C := TCanvas.Create;
C.Handle := DC;
C.Rectangle(10,10,30,20);
C.TextOut(1,1,"VT!!!");
ReleaseDC(Button1.Handle,DC);
C.Free;
Button1.Invalidate;
Впечатление, что Button1 перерисовывается поверх моего прямоугольника.
← →
Song (2002-06-11 14:30) [3]>>В TButton, как и в TScreen, нет Canvas.
:))
Дык всё-равно же через TCanvas рисуете!!!
Страницы: 1 вся ветка
Форум: "Media";
Текущий архив: 2002.10.10;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.011 c