Ver Mensaje Individual
  #2  
Antiguo 13-12-2007
Avatar de Faust
Faust Faust is offline
Miembro
 
Registrado: abr 2006
Ubicación: México D.F.
Posts: 930
Reputación: 19
Faust Va por buen camino
Una splash Form

En cuanto a lo de tu primera consulta, ese formulario de presentación normalmente se le llama Splash Form yo hago lo siguiente aunque no estoy seguro si es lo correcto:

Creo un formulario llamado frmSplash, le asigno propiedades adecuadas, por ej. sin bordes, Position:= poScreenCenter, un color llamativo, le pongo uno o dos Labels para tener un poco de escritura, un Image con el logo de la aplicación o de la empresa, etc. y después en el archivo del proyecto hago lo siguiente:

Añado Windows al uses, ya que utilizo la función Sleep y también añado (si no está) la unit de la SplashForm

Código Delphi [-]
uses
  Forms,
  Messages,
  Windows,
  MainForm in 'MainForm.pas' {frmMain},
  SplashForm in 'SplashForm.pas' {frmSplash},

Y dentro del begin y end principal del archivo de projecto hago esto:

Código Delphi [-]
  Application.Initialize;
  Application.Title:= 'Conteo por Códigos';
  frmSplash:= TfrmSplash.Create(nil);              // Creo la SplashForm
  frmSplash.Visible:= True;                            // La hago visible
  frmSplash.Update;                                     // Un Update no está de más
  Sleep(2000);                                            // Hago una pausa
  Application.CreateForm(TfrmMain, frmMain);  // Se crean los otros forms
  Application.CreateForm(TDM, DM);              // Se crean los otros forms
  frmSplash.Free;                                       // Destruyo mi SplashForm
  Application.Run;                                      // Ya cargó aquí la aplicación

Sobre tu otra consulta, todavía no entiendo muy bien que es lo que quieres.
__________________
Herr Heins Faust
Responder Con Cita