Hallo!
Ich stelle ich bald meine ersten Komponenten fertig. Ich würde gerne die Funktion einbauen, dass man ein Programm, welches mit meinen VCL´s programmiert wurde, nur starten kann, wenn Delphi läuft. Ich habe dazu folgenden Code benutzt:
if FindWindow('TAppBuilder', NIL) <= 0 then
begin
ShowMessage('Blablabla');
Application.Terminate;
end;
Mein Problem ist, dass ich mehrere Komponenten habe, und wenn mehrere VCL´s in dem Programm ist, welches außerhalb von Delphi gestartet wurde, wird die MessageBox ja mehrere Male angezeigt. Meine Frage:
Wie kann ich sofort nach der ersten MessageBox die Anwendung schließen, ohne dass die anderen zuvor noch eingeblendet werden ?
Gruß Christian
Ich stelle ich bald meine ersten Komponenten fertig. Ich würde gerne die Funktion einbauen, dass man ein Programm, welches mit meinen VCL´s programmiert wurde, nur starten kann, wenn Delphi läuft. Ich habe dazu folgenden Code benutzt:
if FindWindow('TAppBuilder', NIL) <= 0 then
begin
ShowMessage('Blablabla');
Application.Terminate;
end;
Mein Problem ist, dass ich mehrere Komponenten habe, und wenn mehrere VCL´s in dem Programm ist, welches außerhalb von Delphi gestartet wurde, wird die MessageBox ja mehrere Male angezeigt. Meine Frage:
Wie kann ich sofort nach der ersten MessageBox die Anwendung schließen, ohne dass die anderen zuvor noch eingeblendet werden ?
Gruß Christian
Comment