Código Delphi [-] // Dimensión del formulario en tiempo de edición Const Ancho = 800; Alto = 600; // Esto va en en Form.Create. // Redimensiona la aplicación en base a la resolución. Height:= Height * Screen.Height div Alto; Width:= Width * Screen.Width div Ancho; // ScaleBy(Screen.Width, Ancho); //en base al ancho ScaleBy(Screen.Height, Alto); // en base al alto.
// Dimensión del formulario en tiempo de edición Const Ancho = 800; Alto = 600; // Esto va en en Form.Create. // Redimensiona la aplicación en base a la resolución. Height:= Height * Screen.Height div Alto; Width:= Width * Screen.Width div Ancho; // ScaleBy(Screen.Width, Ancho); //en base al ancho ScaleBy(Screen.Height, Alto); // en base al alto.