Eine Form nur in einem bestimmten Bereich bewegen ?

[PierreB]

Hallo Win32.Api,

stimmt, Timer sind nicht immer so vorteilhaft.

Aber wir haben noch die Begrenzung oben - unten vergessen. Also:

Delphi-Quellcode:

type
  TForm1 = class(TForm)
  private
    procedure WMMove(var Message: TWMMove); Message WM_MOVE;
    { Private declarations }
  public
    { Public declarations }
  end;

.
.
.
.

procedure TForm1.WMMove(var Message: TWMMove);
begin
  inherited;
  if form1.Left > 200 then form1.left := 200;
  if form1.top > 150 then form1.top := 150;
end;