Hallo.
Ich hab Projekt, das nur starten soll, wenn einige Dateien da sind. Dazu hab ich ne boolsche Funktion gebastelt.
Ich frage mich jetzt ob ich die Application noch irgendwie abfangen muss? Sie wird ja immerhin initialisiert. Der Delphi Debugger meckert jedenfalls nicht rum, was ja nichts heißen muss...
Delphi-Quellcode:
begin
Application.Initialize;
Application.Title := 'Musik-Suite - strela-comp';
if AllFilesExist then
begin
Application.CreateForm(TFMain, FMain);
Application.CreateForm(TFSkalen, FSkalen);
Application.CreateForm(TFKlavier, FKlavier);
Application.CreateForm(TFIntervalle, FIntervalle);
Application.CreateForm(TFOptions, FOptions);
Application.CreateForm(TFAkkorde, FAkkorde);
Application.CreateForm(TFrmQuiz, FrmQuiz);
Application.CreateForm(TFAbout, FAbout);
Application.CreateForm(TFBeispiele, FBeispiele);
Application.CreateForm(TFrmInstrumente, FrmInstrumente);
Application.CreateForm(TFTheremin, FTheremin);
Application.CreateForm(TFReadTones, FReadTones);
Application.Run;
end;
end.