Главная / FAQ по Builder'у / 169 У меня окно имеет свойство...

169 У меня окно имеет свойство BorderStyle=bsNone, но на форме есть Panel1, при помощи которой, я хочу перемещать окно. Как это сделать?


void __fastcall TForm1::Panel1MouseDown(TObject *Sender,
      TMouseButton Button, TShiftState Shift, int X, int Y)
{
  if(Button == mbLeft)
  {
      ReleaseCapture();
      Perform(WM_SYSCOMMAND, 0xF012, 0);
  }
}
abc__ <sergeev@ocs.ru>
Предыдущий вопрос   |  Список вопросов   |   Следующий вопрос
источник      На главную      by jenyok
Copyright © 2003 JTSOFT
Сайт управляется системой uCoz