Скачать: CL | DM;

Запретить перемещение окна   Найти похожие ветки 

← →
BFG9k ©   (2005-08-03 18:10) [0]

Окно перемещается вручную с помощью Drag&Drop и должно оставаться в определенных рамках. Если передвигать его сразу же обратно (в OnmouseMove например), то это будет видно и окно будет скакать. Как можно запретить окну перемещаться ?

---

← →
DVM ©   (2005-08-04 13:26) [1]

WM_MOVING обрабатывать, а не WM_MOVE

---

← →
Morgoth   (2005-08-04 16:20) [2]

procedure WMWINDOWPOSCHANGING(var Msg: TWMWINDOWPOSCHANGING); message WM_WINDOWPOSCHANGING;

procedure TForm1.WMWindowPosChanging(var Msg: TWMWindowPosChanging);
begin
 Msg.WindowPos.x := Left;
 Msg.WindowPos.y := Top;
 Msg.WindowPos.cx := Width;
 Msg.WindowPos.cy := Height;
 inherited;
end;

правда и размер поменять не получится :)

---

← →
BFG9k ©   (2005-08-05 15:46) [3]

2 Morgoth:

Спасибо, все отлично работает.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.025 c