Pfad der Exe-Datei von einem Dienst feststellen

[Mandi Nice]

Hallöchen

Ich bin gerade dabei eine ältere Anwendung so umzustellen, dass diese als Dienst läuft.
Habe von der "Dienst" - Programmierung wenig Ahnung.
Im Internet findet man auch nicht wirklich viel.

Kann mir jemand eine Buch, Anleitung, Tutorial oder ähnliches dafür empfehlen ?

Aber hier mein erstes Problem.
In der alten Anwendung sind dieverse Einstellungen in einem INI-File gespeichert.
Mit ExtractPath(Application.ExeName) stelle ich fest wo die EXE-Datei liegt und wo daher auch die INI-Datei liegt.

Aber in einem Dienst geht das nicht.

Wie kann ich nun feststellen wo die Datei liegt ?

Danke für Eure Hilfe.

hmg
Mandi

[mkinzler]

Aus der Registry auslesen.

[himitsu]

Abgesehn davon gehören solche Daten eh nicht mehr in das Programmverzeichnis (vorallem nicht von installierten Programmen).

Dafür gibt es bestimmte Verzeichnisse, wo sowas hingehört.

Aber wenn du eh umstellst, dann schreib diese Daten doch gleich direkt in die Registry, anstatt der INI.

[DataCool]

Hi,

Du must nicht zwingend den Umweg über die Registry gehen!
Du kannst den Pfad auch folgendermassen ermitteln :

Delphi-Quellcode:

  sAppDir := ExtractFilePath(ParamStr(0));

Greetz Data

[Der.Kaktus]

Hallo,

Du kannst Deine Applikation doch als Dienst laufen lassen. Da gibts nen Tool..AppToService(ApptoService (old-Version))..die iss "noch" Freeware..die neueren Shareware...geht prima..habe ich auch schon oft benutzt.

[Bernhard Geyer]

Zitat:

Zitat von Der.Kaktus

Du kannst Deine Applikation doch als Dienst laufen lassen. Da gibts nen Tool..AppToService(ApptoService (old-Version))..die iss "noch" Freeware..die neueren Shareware...geht prima..habe ich auch schon oft benutzt.

Auch mit Vista/W2008/W7 und aktiver UAC? Solche Tools bzw. die zugrundeliegenden Programme scheitern oft aufgrund der verschärften Default-Rechte eines Prozesses.

[taveuni]

Zitat:

Zitat von Mandi Nice

Mit ExtractPath(Application.ExeName) stelle ich fest wo die EXE-Datei liegt und wo daher auch die INI-Datei liegt.

Aber in einem Dienst geht das nicht.

Abgesehen von allem anderen:
Weshalb sollte das nicht gehen?

Edit: Natürlich so wie von DataCool geschrieben.

[Mandi Nice]

Hallo DataCool

Wenn das wirklich so einfach geht. Super. Danke.


Hallo taveuni

Weil Application bei einem Dienst die Eigenschaft ExeName nicht kennt :-(



hmg
Mandi

[himitsu]

Application.ExeName ist nur eine Weiterleitung zu ParamStr(0)
und dieses holt sich den Dateinamen zum geladenen Image der Anwendung, welches immer existiert.

[Mandi Nice]

Hallo Der.Kaktus

>> Da gibts nen Tool..AppToService(ApptoService (old-Version)).

Sowas war auch mal im CT' zu finden.
Wäre auf meinem Rechner OK.
Ist mir aber bei meinem Kunden zu riskant.


Hallo himitsu

>> Abgesehn davon gehören solche Daten eh nicht mehr in das Programmverzeichnis (vorallem nicht von installierten Programmen).

Ich gebe Dir Recht. Für große Anwendungen soll man es nicht machen.

Meinen Anwendungen müssen normaler nicht installiert werden.
Es gibt meist ein Setup, aber es reicht die Dateien einzukopieren.
Und die meisten Kunden sind froh das Setup nicht ausführen zu müssen.
Die meisten haben auf dem Rechner nämlich keine Admin-Rechte !


hmg
Mandi

[chaosben]

Nur noch der Vollständigkeit wegen: Über QueryServiceConfig geht der offizielle Weg. (Damit kommt auch an die Pfade der Dienste, die man nicht selbst ist.)