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

Как привязать Label к Shape?   Найти похожие ветки 

← →
Niko ©   (2002-12-18 16:28) [0]

Тема такая в программе необходимо перетастивать Shape"ы с надписями, при пертаскивании само сабой перетаскивается только Shape, а Label остается (конечно можно сделать чтобы при опускании Shapa Label пермещался туда куда надо, но проблема в том что пользователь может сначала ткнуть в Label и никого переноса), или подскажите более лучший вариант (компонент).

---

← →
Skier ©   (2002-12-18 16:31) [1]

>Niko
А тебе обязательно так...?
Может просто рисовать текст на канве Shape ?

---

← →
Niko ©   (2002-12-18 16:39) [2]

А она есть, эта канва?

---

← →
Skier ©   (2002-12-18 16:46) [3]

>Niko

TGraphicControl = class(TControl)
private
FCanvas: TCanvas;
procedure WMPaint(var Message: TWMPaint); message WM_PAINT;
protected
procedure Paint; virtual;
property Canvas: TCanvas read FCanvas; //а это вот что ?

---

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

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



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