Ver Mensaje Individual
  #3  
Antiguo 28-08-2006
Avatar de seoane
[seoane] seoane is offline
Miembro Premium
 
Registrado: feb 2004
Ubicación: A Coruña, España
Posts: 3.717
Reputación: 24
seoane Va por buen camino
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);
Responder Con Cita