Ver Mensaje Individual
  #2  
Antiguo 21-10-2004
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.306
Reputación: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
El objeto TScreen de Delphi posee propiedades que tal vez te puedan ser de utilidad. Comprueba el Width y el Height de la pantalla con:

Código Delphi [-]
  Screen.Width
  Screen.Height
y comparalos con tus posiciones almacenadas.

También podrías guardar, además de la posición si la pantalla se ve en el segundo monitor o no, y luego comprobar cuantos mnitores existen en el ordenador donde se visializa.

Código Delphi [-]
  Screen.MonitorCount

Luego posees las propiedades que trabajan con el espacio total incluyendo todos los monitores: DesktopHeight, DesktopLeft, DesktopRect, DesktopTop, DesktopWidth y las que trabajan con el espacio del primer monitor (el primario) WorkAreaHeight, WorkAreaLeft, WorkAreaRect, WorkAreaTop, WorkAreaWidth. Combinando éstas puedes encontrar una solución; Por ejemplo:
Si sólo existe un monitor y las coordenadas guardadas (LEFT) "se salen" del espacio del primer monitor, restar a las coordenadas en ancho del primer monitor (BIS para el TOP).
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita