описываем константу
  const long SC_DRAGMOVE = 0xF012;

на событие OnMouseDown формы пишем
  ReleaseCapture();
  SendMessage(Handle, WM_SYSCOMMAND, SC_DRAGMOVE, 0);

Sergiy Kanilo

Предыдущий вопрос   |    |   Следующий вопрос

источник            by jenyok