los forms se ven desastrozos

[Patricio]

Hola gente tengo una pequeña aplicacion en delphi, el tema que ahora cambiaron 3 monitores de los 7 que hay y compraron de 23 pulgadas, yo arreglaba el tema de los tamaños con el siguiente codigo

procedure TFUPrincipal.Escalar;
const
ancho = 1024; // Ancho en el momento del diseño
alto = 1000; // Alto en el momento del diseño
begin
Height := Height * Screen.Height div alto;
Width := Width * Screen.Width div ancho;
ScaleBy(Screen.Width, ancho);
end;


Pero ahora se ven la mita de las opciones en estos monitories grandes, que me recomiendan?

[Patricio]

Gente ahi mire las resoluciones, el tema que en uno de los monitores la resolucion es de 1920 x 1080 y ahi se ve el 80% de la altura del formulario, las otras resoluciones va safando, alguna ayuda?

[Casimiro Notevi]

Pero el problema exactamente, ¿cuál es?

Recuerda poner los tags al código fuente, ejemplo:

http://www.clubdelphi.com/images/UtilizarTAGs.png

Gracias :)

[Patricio]

hola gracias por tu respuesta el tema que en estos monitores nuevos, con el procedimiento escalar se ve la mitad del formulario solamente, hay alguna otra forma de acomodar esto?

[nlsgarcia]

Patricio,


...los forms se ven desastrosos...se ve la mitad de las opciones en estos monitores grandes (23 pulgadas)...


Revisa estos links:

Multi-Resolution Delphi Applications : http://delphi.about.com/od/standards/a/aa030700a.htm

Scale your form to work in multi-resolution environment : http://chee-yang.blogspot.com/2009/01/delphi-scale-your-form-to-work-in-multi.html

Form design for different screen resolutions : http://delphi-kb.blogspot.com/2011/04/form-design-for-different-screen.html
Espero sea útil :)

Nelson.

[ecfisa]

Hola.

También te puede servir este enlace: Ejecutar un programa en otra resolución (http://www.clubdelphi.com/foros/showthread.php?t=74220)

Saludos. :)

[Neftali [Germán.Estévez]]

Si pones una imagen de esos formularios nos haremos una idea exacta del problema.

[Patricio]

Aca les dejo un formulario donde se corta el alto del mismo en resoluciones tipo 1440 x 900 o menores. Tambien les consulto por el tema de que las imagenes no se agrandan en proporcion como los paneles a ver si me dan una mano. Gracias

[Patricio]

Gente, lo resolvi preguntando por la resolucion, si es 800x600 o 1024 x 768 lo hago como venia haciendo y si es mayor cambio las propiedades de ancho y alto, con el siguiente codigo, alguien me sugiere que lo haga de otra forma?
Gracias


var
Alto: integer;
Ancho:integer;
begin
if (screen.DesktopHeight <> 768) and (screen.DesktopHeight <> 600)
then
begin
Alto := 600; // 768, ...
Ancho := 900; // 1366, ...
end
else
begin
Alto := 580; // 768, ...
Ancho := 800; // 1366, ...
end;
Height := Height * Screen.Height div Alto;
Width := Width * Screen.width div Ancho;
ScaleBy(Screen.Width,Ancho);