Форум — Ответы ( К темам )
? | AndreyAGSoft: Окна (07-02-2003 10:38:53) |
У меня окно без системной рамки. Как его таскать! | |
Petro (07-02-2003 17:18:24) | |
Очевидно, обрабатывать событие WM_MOUSEMOVE с проверкой нажатия левой клавиши мыши.
| |
Владимир (08-02-2003 11:17:30) | |
Окно можно таскать за что угодно Посмотрите пример на этом форуме такой есть там где спрашивают про окна непрямоугольной формы, там и есть про это. Вот нашел // таскаем форму за форму (вместо формы поместите этот код например // в TLabel и будете таскать за TLabel и т.д.) void __fastcall TForm1::FormMouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y) { const int SC_DRAGMOVE = 0xF012; if(WindowState!=wsMaximized) { ReleaseCapture(); Perform(WM_SYSCOMMAND, SC_DRAGMOVE, 0); } } |