Duda sobre FindWindow

[[seoane]]

Me quedaba lo de mandar a otro monitor, en este otro hilo ya hablamos sobre el tema, pero utilizando el Handle la cosa quedaría así:

Código Delphi [-]
procedure MandarA(Handle: Thandle; Monitor: Integer);
begin
  if Screen.MonitorCount > Monitor then
    SetWindowPos(Handle,HWND_TOP,Screen.Monitors[Monitor].Left,
      Screen.Monitors[Monitor].Top,0,0,SWP_NOSIZE);
end;

// Por ejemplo para mandarlo al segundo monitor
MandarA(Handle,1);