Delphi - Limitar el movimiento de una form

Me hace falta que me expliquen como se limita el movimiento de la form a un espacio de la pantalla.

Pon la propiedad DragKind a dkDock y el siguiente código en el evento EndDock del form (por ejemplo):

procedure TForm1.FormEndDock(Sender, Target: TObject; X, Y: Integer);
begin
if Left<=150 then
Left:=150;
end;

Este ejemplo limita que el form pueda moverse más a la izquierda que 150 pixeles.

Un saludo.