間違えて送信してしまいました。

procedure TForm1.WMMove(var Message: TWMMove);
begin
　inherited;
　{必要な処理}
end;

で、いいと思います。
OnMoveなんてイベントが無い以上、それほど厨な質問でも無いかと。