Borland C++ Builder VCL FAQ - Перемещение формы мышью не за заголовок

Written on . Posted in C++ Builder

ОГЛАВЛЕНИЕ

Страница 69 из 96

Перемещение формы мышью не за заголовок

Чтобы перемещать форму мышью не за заголовок, напишите следующий обработчик события OnMouseDown формы
void __fastcall TForm1::FormMouseDown(TObject *Sender, TMouseButton Button,
TShiftState Shift, int X, int Y)
{
    long SC_DRAGMOVE = 0xF012;
    if(Button == mbLeft)
      {
        ReleaseCapture();
        SendMessage(Handle, WM_SYSCOMMAND, SC_DRAGMOVE, 0);
      }
}

форум c++ builder