Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как привязать Label к Shape? [D5, D6]


Niko ©   (2002-12-18 16:28:00) 

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


Skier   (2002-12-18 16:46:00) [1]

>Niko

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


Niko   (2002-12-18 16:39:00) [2]

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


Skier   (2002-12-18 16:31:00) [3]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо