Bedingte Kompilierung, wenn IDE gestartet ist

[mm1256]

Zitat von Schwedenbitter:

Also gibt es einen Schalter für die IDE?

Einen Schalter gibt es nicht, aber eine function kannst du verwenden.

Delphi-Quellcode:

function IsDelphiRunning: boolean;
begin
  Result := FindWindow('TAppBuilder', Nil) > 0;
end;

So mach ich das schon sehr lange und es funzt. Ich hab mir sogar eine kleine App mit dem Fenstertitel 'TAppBuilder' erstellt und das Projekt Bds.dpr genannt. Diese kleine Exe starte ich dann bei Problemen mit der ursprünglichen Anwendung und gaukle der somit vor, dass die Delphi-IDE läuft. Damit kannst du quasi deine App dann beim Kunden "debuggen". Extrem praktisch.

[OT]So nebenbei bemerkt: Das Prinzip mit der eigenen Bds.exe funktioniert sogar mit einigen Bibliotheken zum Testen, die nur laufen, wenn die BDE gestartet ist.[/OT]

[Sherlock]

Probier mal

Delphi-Quellcode:

if DebugHook > 0 then
  ShowMessage('Debugger ist da')
else
  ShowMessage('Kein Debugger');

Wobei man fairerweise wohl dazu sagen muss, daß System.DebugHook wohl nur die IDE als Debugger sieht.

Sherlock