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

Written on . Posted in C++ Builder

ОГЛАВЛЕНИЕ

Страница 107 из 127

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

// Напишите следующий обработчик события 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