![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Ребят, подскажите, как можно "таскать" 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]
> а вот как обработать события?
В смысле?