Перетаскивание формы мышью за все места!
Все знают как переместить по экрану форму, взять её мышью за панель заголовка и перетасчить! А как можно сделать чтобы её можно было перетаскивать за саму форму. Просто нажать в любую точку формы и не отпуская мышью таскать форму! Как в IM Miranda .
Цитата:
Originally posted by kas
Все знают как переместить по экрану форму, взять её мышью за панель заголовка и перетасчить! А как можно сделать чтобы её можно было перетаскивать за саму форму. Просто нажать в любую точку формы и не отпуская мышью таскать форму! Как в IM Miranda .
Все знают как переместить по экрану форму, взять её мышью за панель заголовка и перетасчить! А как можно сделать чтобы её можно было перетаскивать за саму форму. Просто нажать в любую точку формы и не отпуская мышью таскать форму! Как в IM Miranda .
Попробуй так:
void __fastcall Form1::MouseMove(TShiftState Shift,int X, int Y)
{
if (!Shift.Contains(ssLeft)) return;
ReleaseCapture();
Perform (WM_SYSCOMMAND,0xF012,0);
}
Цитата:
Originally posted by Бешеный кролик
Попробуй так:
void __fastcall Form1::MouseMove(TShiftState Shift,int X, int Y)
{
if (!Shift.Contains(ssLeft)) return;
ReleaseCapture();
Perform (WM_SYSCOMMAND,0xF012,0);
}
Попробуй так:
void __fastcall Form1::MouseMove(TShiftState Shift,int X, int Y)
{
if (!Shift.Contains(ssLeft)) return;
ReleaseCapture();
Perform (WM_SYSCOMMAND,0xF012,0);
}
Большое спасибо! Все работает! =)