Недвигающееся окно

← →
UNIVERSAL (2002-11-22 10:50) [0]

Доброе время суток, господа программисты. Подскажите, плз, как сделать окно(форму) , которое нельзя переместить с помощью API(без хуков)?

← →
Song (2002-11-22 11:06) [1]

...
procedure IsWindowMoving(Var Msg:TMessage); message WM_MOVING;

...

procedure TForm1.IsWindowMoving(Var Msg:TMessage);
Begin
PRect(Msg.LParam).Left:=Left;
PRect(Msg.LParam).Top:=Top;
PRect(Msg.LParam).Right:=Left+Width;
PRect(Msg.LParam).Bottom:=Top+Height;
End;

← →
UNIVERSAL (2002-11-22 11:20) [2]

Спасибо, но хочется именно с помощью API, дело в том что это надо сделать вообще-то в Access.

Недвигающееся окно Найти похожие ветки