Hallo
Ich habe in mein Programm ein Splash eingebunden.
Der Splash verschwindet wenn eine gewisse Zeit abgelaufen ist oder wenn ich eine Taste drücke oder wenn ich mit der Maus klicken. Dann wird eine Boolean Variable (blnSplash) True gesetzt.
Der Splash verschwindet zwar aber er ist im Taskmanager immer noch zu sehen.
Was mache ich falsch?
Gruss
Aurus
Delphi-Quellcode:
begin
SplashF := TSplashF.Create(Application);
Screen.Cursor := crHourGlass;
SplashF.Show;
SplashF.Refresh;
Application.Initialize;
Application.Title := 'Demo Programm ';
Application.CreateForm(THauptansicht, Hauptansicht);
Application.CreateForm(TEinstAll, EinstAll);
Application.CreateForm(TSplashF, SplashF);
while SplashF <> nil do
begin
Application.ProcessMessages;
if (SplashF <> nil) AND (Hauptansicht.blnSplash = True) then
begin
SplashF :=Nil;
SplashF.Free;
end;
end;
Screen.Cursor := crDefault;
Application.Run;
end;
[edit=SirThornberry]Delphi-Tags gesetzt. Nächstes mal bitte selbst machen. Mfg, SirThornberry[/edit]