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

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

Есть обьект на форме допустим GroupBox , я ему установил свойс. D


denisww ©   (2003-01-15 21:37:00) 

Есть обьект на форме допустим GroupBox , я ему установил свойс. DragMode - auto, DragKind-dkDock(получаеться можно обьект стянуть с формы)Вопрос:как стянуть програмно сей обьект ?

есть думка типа:
GroupBox.BeginDrag(True);

??????????????????????

GroupBox.EndDrag(False);


denisww   (2003-01-19 12:32:00) [1]

Var R:TRect;

R:=rect(10,10,100,100);
ManualFloat(R);
ManualDock(HostDockSite,Nil,alnone);

!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!


denisww   (2003-01-18 09:14:00) [2]

1


denisww   (2003-01-17 16:53:00) [3]

ну не очень хорошо работает- некрасиво , а есть ещё варианты?


denisww   (2003-01-16 10:51:00) [4]

With GroupBox do Begin
HostDockSite:= FloatingDockSiteClass.Create(self);
(HostDockSite as FloatingDockSiteClass).BoundsRect:=
rect(10,10,100,100);
end;
en


Большая благодарность [vidiv]


Набережных С.   (2003-01-15 23:24:00) [5]

GroupBox.Dock(TargetWinControl,Rect(0,0,100,100))


denisww   (2003-01-15 22:47:00) [6]

неплохо было бы по координатам установить окно


denisww   (2003-01-15 22:44:00) [7]

требуеться стянуть обьект как бы по умолчанию


Наверх

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