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

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

Ребят, подскажите, как можно "таскать" TGroupBox по форме


mmms ©   (2005-02-22 14:16:00) 

мышкой? DragDrop+F1 смотрел, dragmode - dmAutomatic, а вот как обработать события?


mmms   (2005-02-22 14:38:00) [1]

Да, я его нашел уже, в яндексе 3м вышел. Как раз то что надо!
Благодарю.


Skier   (2005-02-22 14:34:00) [2]

http://z-ol.chat.ru/cmplib/handles.zip


mmms   (2005-02-22 14:31:00) [3]

[2] Skier ©   (22.02.05 14:28)
Посмотрю, спасибо.


mmms   (2005-02-22 14:30:00) [4]

Ну что там делать по отпусканию, что при нажатию, какой смысл то ещё?
Что нашел, то вот это:
procedure TForm1.GroupBox1MouseDown(Sender: TObject; Button: TMouseButton;
 Shift: TShiftState; X, Y: Integer);
const
 SC_DragMove = $F012;
begin
 ReleaseCapture;
 GroupBox1.Perform(WM_SysCommand, SC_DragMove, 0);
end;

Что то не пашет она у меня.


Skier   (2005-02-22 14:28:00) [5]

>mmms   (22.02.05 14:16)  
Найди в Инете компонент TStretchHandle и таскай на здоровье...


Cosinus   (2005-02-22 14:23:00) [6]


> а вот как обработать события?
В смысле?


Наверх

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