Скачать: CL | DM;

Рисование на TButton   Найти похожие ветки 

← →
MSTX   (2004-07-25 14:18) [0]

Здравствуйте!

Подскажите пожалуйста, как можно рисовать на компоненте TButton, ведь у него нет свойства Canvas?

Заранее благодарен

---

← →
P.N.P. ©   (2004-07-25 14:23) [1]

Сделать наследника с Canvas

type

 TMyBtn = class(TButton)
 private
   FCanvas: TCanvas;
....

Посмотри, как сделана TBitBtn

---

← →
vertex ©   (2004-07-25 14:27) [2]

проще:

var canvas:tcanvas;
begin
canvas:=tcanvas.create;
canvas.handle:=GetDC(Button.Handle);
...

---

← →
MSTX   (2004-07-25 16:58) [3]

Т.е. если этого свойства нет, его следует создать? Всего-то!
Первый способ мне больше подходит, т.к. это мне надо именно для создания компонента.

P.N.P., vertex, благодарю за ответы!

---

← →
malkolinge ©   (2004-08-10 20:31) [4]

> vertex ©   (25.07.04 14:27) [2]
> проще:
>
> var canvas:tcanvas;
> begin
> canvas:=tcanvas.create;
> canvas.handle:=GetDC(Button.Handle);
> ...

Прикольно вот только нужно еще момент КОГДА делать отрисовку поймать.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.036 c