Ver Mensaje Individual
  #5  
Antiguo 26-03-2009
Avatar de MAXIUM
MAXIUM MAXIUM is offline
Miembro
 
Registrado: may 2005
Posts: 1.490
Reputación: 21
MAXIUM Va camino a la fama
en el Form.Create

Código Delphi [-]
// Redimensiona la aplicación en base a la resolución de la pantalla.
     ScaleBy(Screen.WorkAreaHeight*Width Div Height, Width);
     Height:= Screen.WorkAreaHeight;
     Left:= (Screen.Width - Width) Div 2;
     BorderIcons:= BorderIcons - [biMaximize];
     Top:= 0;

Propiedad del formulario
BorderStyle = bsSingle
ClientHeight = 542
ClientWidth = 792
Responder Con Cita