Abfrage: Läuft Programm in Delphi-Entwicklungsumgebung?

[Claudius Reiner]

Wie kann ich feststellen, ob mein Programm in der Delphi-Entwicklungsumgebung läuft oder als eigenständige Exe?

[Jens Schumann]

Hallo Claudius,<br>über FindWindow würde ich nach folgenden Fensterklassen suchen (Delphi 5):<br>TAppBuilder<br>TPropertyInspector<br>TEditW indow<br><br>
<pre>
...
a1 : hWnd ;
a2 : hWnd ;
a3 : hWnd ;
...
a1:=FindWindow('TAppBuilder',Nil);
a2:=FindWindow(TPropertyInspector,Nil);
a3:=FindWindow(TEditWindow,Nil);
DelphiIsRunning:=(a1<>0) and (a2<>0) and (a3<>0);
</pre><br>
TAppBuilder ist Delphi's Klassenname<br>
TPropertyInspector ist der ObjectInspector<br>
TEditWindow ist der Editorfenster.<br><br>Ich weiß nicht wie die Klassennamen bei anderen Delphiversionen lauten.<br>:-) Jens Schuman

[Hagen Reddmann]

Jo, dann hast'e aber erstmal ermittelt das Delphi oder BCB auf dem System läuft. Nun wäre noch die Frage, ob die EXE durch Delphi oder ausserhalb gestartet wurde, zu klären.

Gruß Hage