Leute, ihr seid zu schnell für diese Welt .. =) rasend schnelle Antworten hier im Forum.. big up!! .. danke habs gecheckt...
aber .. ehem .. da wir schon mal gerade dabei sind eine Folgefrage:
Warum funktioniert die close-anweisung darin nicht?
Code:
procedure TForm1.FormCreate(Sender: TObject);
begin
if not fileexists('main.exe')
then showmessage('Programm muss sich im Hauptverzeichnis befinden');
close;
end;