Cita:
Empezado por Bauhaus1975
Hola de nuevo,
(Trabajo con Delphi Studio 2006 para Win32)
Parece que trabajando en un proyecto en ordenadores con resolución, el primero de 1280 y otro con 1024 al abrir el proyecto los formularios y fuentes aparecen reducidos en algunos casos (creo que los que trabajé en el PC a mayor resolución)
¿Hay alguna manera de hacer que todo quede a dimensiones y tamaños de fuentes estables, independientemente con el ordenador con el que abra el proyecto?
Gracias y un saludo.
|
Hola, bueno, existen varias formas de hacer lo que necesitas...
lo que yo utilizo es usar una función que me cambie la resolucion de la pantalla...
te dejo la función...
Código Delphi
[-]
Function SetScreenResolution(Ancho, Altura: integer): Longint;
var
DeviceMode: TDeviceMode;
begin
with DeviceMode do begin
dmSize := SizeOf(TDeviceMode);
dmPelsWidth := Ancho;
dmPelsHeight := Altura;
dmFields := DM_PELSWIDTH or DM_PELSHEIGHT;
end;
Result := ChangeDisplaySettings(DeviceMode, CDS_UPDATEREGISTRY);
end;
y para llamarla solo debes poner esto
Código Delphi
[-] SetScreenResolution(1024, 768);
creo que esto lo debieras complementar con una función que te entrege la resolución del sistema (no tengo ninguna a mano)..... cosa que cuando ingreses al sistema preguntes si la resolución es igual a la que necesita tu sistema, si la cumple no haces nada, pero si no la cumple guardas la resolución en una variable, cambias la resolucción a la deseada y cuando salgas del sistema restableces la resolución del sistema a la que tenia ...
Salu2