RESPUESTA A LA PREGUNTA 4760 - DELPHI


Hola:

Primero: Debes diseñar tu formulario en la menor
resolución (640,480), de
esta manera cualquiera que sea la resolución que tenga
el usuario, tu
aplicación nunca se desbordará.

Segundo: Una vez que tu formulario esté cargado, para
evitar que la posición
del mismo varíe en caso que el usuario cambie la
resolución de pantalla en
ese momento, debes crear una function que lea
constantemente del registro
para detectar si la resolución cambia o no, y en
dependencia actualizar la
posición del formulario.

Este código puede ayudarte:
1: Poner en tu formulario un control Timer con un
valor en el intervalo
(1000) que es el tiempo que demora la pantalla en
reestablecerse cuando el
usuario cambia el modo de resolución de pantalla e
invocar esta function en
el evento OnTimer.
2: También debes invocar esta function en el evento
FormCreate para
almacenar el valor de la resolución de la pantalla en
la variable Tmp en el
momento que se carga tu aplicación para de esta manera
solo actualizar la
posición si el usuario cambia de resolución.

var
  Tmp: String = '';

function LeeRegVal: String;
var
  Reg: TRegistry;
begin
  Reg := TRegistry.Create;
  Reg.RootKey := HKEY_CURRENT_CONFIG;
  Reg.OpenKey('Display\Settings', False);
  Result := Reg.ReadString('Resolution');
  if Tmp = '' then
    Tmp := Result;
  if Tmp <> Result then
    begin
      Form1.Position := poScreenCenter;
      Tmp := Result;
    end;
  Reg.Free;
end;

Prueba esto, te aseguro que funciona. Teniendo en
cuenta que es una
modificación de algo que ya hice
Si no resuelves enviame tu correo para enviarte
ejemplos concretos.

Tercero: Si lo que deseas exactamente es que tu
aplicación se muestre a
pantalla completa en todas las resoluciones de
pantalla, entonces no te
queda otro remedio que diseñar diferentes formularios
para cada resolución
de pantalla y mostrarlas según convenga después de
leer del registro de
windows el modo en que se encuentra la  pantalla en
ese momento o actualizar
en el mismo formulario los tamaños de los objetos para
cada resolución
teniendo en cuenta que el formulario debe tener como
propiedad AutoSize en
(True) para que se ajuste según convenga.


Mi nombre es Elias y puedes escribirme a estas
direcciones de correo:
hdspatry@yahoo.com
mtss@ip.etecsa.cu

Espero que resuelvas Chao.