Thema: Delphi Startfenster mit Timer

Einzelnen Beitrag anzeigen

web4martin

Registriert seit: 21. Apr 2003
5 Beiträge
 
Delphi 6 Professional
 
#4
  Alt 21. Apr 2003, 17:04
Hallo,

hier der Quelltext meines Programmes, genauer der DPR-Datei...
Delphi-Quellcode:
program gewundver;

uses
  Forms,
  Windows,
  guv in 'guv.pas{Main},
  ein_u_aus in 'ein_u_aus.pas{ein_aus},
  Waehrung_1 in 'Waehrung_1.pas{Waehrung},
  Starte in 'Starte.pas{Begruessung};

{$E exe}

{$R *.res}

begin
  Application.CreateForm(TBegruessung, Begruessung);
  try
  Begruessung.show;
  Application.Initialize;
  Begruessung.Update;
  Sleep(3000);
  Application.Title := 'CalcMon 2003';
  Application.CreateForm(TMain, Main);
  Application.CreateForm(Tein_aus, ein_aus);
  Application.CreateForm(TWaehrung, Waehrung);
  Begruessung.hide;
  finally
   Begruessung.Free;
  end;
  Application.run;
end.
Nun habe ich das Problem, dass bei meiner Anwendung nur noch das Splashscreen angezeigt wird, aber nicht mehr die eigentliche Application...

Würde mich über Hilfe sehr freuen.

Mfg

Martin Schneider
***************************************
Programmieren - Übung macht den meister...
  Mit Zitat antworten Zitat