Delphi suchen...

[sakura]

Hi DPler,

wie kann ich aus einer Anwendung heraus feststellen, ob Delphi zur Zeit akitv ist. Dabei ist zu beachten, daß die Anwendung nicht unter Delphi läuft. Es muß für alle Delphi-Version aber Delphi 4 funktionieren.

......

[Christian Seehase]

Moin sakura,

eine spontane Idee:
In der Registry steht unter HKLM\Software\Borland\Delphi\<VERSION, z.B. 5.0> ein Wert App, der den Pfad zur Delphi32.EXE enthält.

Du könntest überprüfen, ob diese Datei aktiv ist oder nicht.
(bei mehreren Installierten Versionen natürlich bei jeder zu prüfen )

[sakura]

Zitat von Christian Seehase:

Du könntest überprüfen, ob diese Datei aktiv ist oder nicht.

Hilf mir mal auf die Sprünge, wie ich dieses überprüfe

......

[Alexander]

mhm mir würde jetzt mal einfallen, nach dem Fenster zu suchen. Also das Handle zu suchen (z.B. nach dem Titel des Fensters suchen). Würde das nicht das Problem lösen?

[Christian Seehase]

Moin sakura,

das ginge dann entweder elegant über die Prozessliste, oder brutal, indem Du einfach versuchst die Datei zum Schreiben zu öffnen. Schlägt das fehlt ist die EXE aktiv
(Schliessen nicht vergessen)

[sakura]

Zitat von Christian Seehase:

das ginge dann entweder elegant über die Prozessliste

Schon klar, bloss einen Ansatz bräuchte ich, da ich das noch nicht gemacht habe - zumindest ist es ewig her...

Zitat von Christian Seehase:

indem Du einfach versuchst die Datei zum Schreiben zu öffnen

Unter Win9X nicht, fällt also als Option flach

......

[jbg]

Hat es schon einer mit
FindWindow('AppBuilder', nil)
probiert?
Ja Delphi's eigentlicher Name sollte "App(lication) Builder" sein. Es wurde dann aber doch der Codename benutzt, da die Presse diesen schon so gut vermarket hatte.

[Alexander]

so ähnlich meinte ich das ja

[Christian Seehase]

Moin sakura,

was die Prozessliste angeht, hab' ich das leider auch nicht parat.
Das müsste ich mir auch erst einmal wieder zusammensuchen
Aber hierbei musst Du dann ja auch wieder zwischen 9xff und NTff unterscheiden.

Schade, dass ich das mit dem zum Schreiben öffnen unter 9x nicht ausprobieren kann, denn auch dort müsste die Datei wenn sie läuft vom System exklusiv geöffnet worden, und somit blockiert sein.

Alexanders bzw. jbg's Variante sind doch der Überlegung Wert.
Das dürfte die mit Abstand einfachste Möglichkeit sein.

[sakura]

Ich entscheide mich erst einmal für die einfache Variante, welche denn dann heisst:

Code:

FindWindow('[b][color=#e50000]T[/color][/b]AppBuilder', nil)

Danke

......