Tecsitel_FactuGES2/Source/Cliente/FactuGES.dpr

program FactuGES;

uses
  ExceptionLog,
  Forms,
  Windows,
  SysUtils,
  uFactuGES_App,
  uPantallaPrincipal in 'uPantallaPrincipal.pas' {fPantallaPrincipal},
  uMenuUtils in 'Utiles\uMenuUtils.pas',
  uSplash in 'uSplash.pas' {SplashScreen},
  uAcercaDe in 'uAcercaDe.pas',
  uNavPaneController in 'uNavPaneController.pas',
  uNavPaneUtils in 'Utiles\uNavPaneUtils.pas',
  uMainMenuController in 'uMainMenuController.pas',
  uClienteUtils in 'Utiles\uClienteUtils.pas';

{$R *.res}

var
  Version : String;

begin
  Application.Initialize;
  //ReportMemoryLeaksOnShutdown := True;

  // <20><><EFBFBD>Fallo en Delphi 2007!!!
  // Tengo que ponerlo a false porque si no el formulario principal no se puede poner por encima de los formularios hijos.
  // Luego, en el formulario principal cambio los param<61>tros para obligar a que aparezca el icono en la barra de tareas.
  Application.MainFormOnTaskbar := False;

  Application.Title := AppFactuGES.AppName;

{  fActualizacion := TfActualizacion.Create(Application);
  try
    if fActualizacion.HayConfiguracion then
      fActualizacion.Actualizar;
    Version := fActualizacion.DarVersion;
  finally
    FreeAndNIL(fActualizacion);
  end;}

  Application.CreateForm(TfPantallaPrincipal, fPantallaPrincipal);
  Application.Run;
  Application.Terminate;
end.