Pfad der eigenen Anwendung - ohne Application. Param...

[tn249]

Hallo,

Hab keine Ahnung ob das was ich versuche überhaupt funktioniert, aber fragen kann man ja mal.

Ich habe eine Klasse, also den Protoptyp eines Objekts.

Im constructor der Klasse möchte ich den Pfad der Anwendung in eine Variable schreiben, jedoch ohne eine Variable aus der aufrufenden Funktion zu übergeben.

Geht das evtl. über irgendwelche API-Aufrufe?

Welche anderen Ansätze gibt es?

Gruß
tn249

[SMO]

Ich nehme an, du meinst ohne "Application.ExeName". Du kannst stattdessen "ParamStr(0)" benutzen, ist dasselbe.

[tn249]

Ich meinte .Paramstr(0), .Exename basiert auf .Paramstr(0).

In dem von mir oben geschildertem Fall hab die gesamte "Application" nicht zur Verfügung.

Gruß
tn249

[marabu]

Das sollte funktionieren:

Delphi-Quellcode:

uses
  Windows;

function ExeName: string;
begin
  SetLength(Result, 261);
  SetLength(Result, GetModuleFileName(0, @Result[1], Length(Result)));
end;

Grüße vom marabu

[SMO]

Ja, genau, Application.ExeName basiert auf ParamStr(0). Die ParamStr-Funktion kommt aus der Unit "System" und ist daher überall verfügbar, auch ohne Application-Objekt.

Also kannst du ParamStr(0) benutzen. Oder gleich die WinAPI-Funktion GetModuleFileName, die ruft ParamStr(0) nämlich intern auf.

[tn249]

Gut vielen Dank euch beiden. Es funktioniert soweit.

Der Vollständigkeit halber erwähne ich jedoch noch, dass GetModuleFileName nicht nur den Pfad liefert, sondern auch noch den Dateiname selbst. (Zumindest in meinem Test)

aber das ist ja mit EctractFilePath dann kein großes Ding mehr.

Gruß
tn249

[Christian Seehase]

Moin tn249,

Zitat von tn249:

Der Vollständigkeit halber erwähne ich jedoch noch, dass GetModuleFileName nicht nur den Pfad liefert, sondern auch noch den Dateiname selbst.

was auch ParamStr(0) bzw. Application.ExeName auch tun.
Es ist eben der Pfad und nicht das Verzeichnis der Anwendung.

[tn249]

Hm. Ich glaub die 10 Stunden pralle Sonne und die giftige verstrichene Farbe ham doch etwas mehr als nur dröhnendes Hämmern in meinem Kopf hinterlassen

[Olli]

@marabu: Statt 261 bitte "MAX_PATH+1" verwenden. Man sollte sich immer vor Augen halten, daß es auf der C-Seite #defines sind. Und die können sich potentiell auch ändern

Und seien wir mal ehrlich, da es Literale sind, macht es doch auch zur Laufzeit keinen Unterschied. In der Wartbarkeit aber potentiell schon.

Beste Grüße an den marabu,

[thule]

Hallo. Das ist mein erster Post und dann auch gleich schon eine frage.
Ich lerne delphi privat aus interesse und hier ist schon lange eine DER quellen für gute erklärungen.

Mich Interessiert:

wenn meine anwendung (console) als parameter [ParamStr(1)] einer anderen gestartet wird bekomme ich mit ParamStr(0) nur Die Hostanwendung. Wie komme ich an den Exe-Name meiner eigenen anwendungen IMMER mit sicherheit? Oder mache ich etwas falsch?

Gruß, Thule