Anwendungsstart über Link - ParamStr(0) nicht pfad zur exe

[enebk]

Hallo Delphi-Gemeinde!

In meinem Programm wird beim Starten mit
ExtractFilePath(ParamStr(0));
der Pfad zur exe bestimmt. Wenn man es aber über einen Link (Desktop/ Startmenü) startet gibt ParamStr(0) den Pfad zur .lnk-Datei (C:/.../Dektop/ z.B.) zurück.

Alternativen wie GetCurrentDir oder Application.ExeName funktionieren auch nicht.

Was für Ansätze gibt es noch?

Viele Grüße

[hoika]

Hallo,

Delphi-Quellcode:

var
  szLibFileName    : array[0..MAXPATH] of Char;
begin
        GetModuleFileName(HInstance, szLibFileName, SizeOf(szLibFileName)-1);

Heiko

[worker]

Hmm, bei mir gibt ExtractFilePath(ParamStr(0)) im OnCreate den korrekten Pfad zur Exe zurück; egal ob direkt getartet, oder per Verknüpfung die irgendwo liegt.

[Muetze1]

Zitat:

Zitat von enebk

der Pfad zur exe bestimmt. Wenn man es aber über einen Link (Desktop/ Startmenü) startet gibt ParamStr(0) den Pfad zur .lnk-Datei (C:/.../Dektop/ z.B.) zurück.

Du hast definitiv die EXE kopiert anstatt einen Link erzeugt.

[enebk]

Zitat:

Zitat von Muetze1

Du hast definitiv die EXE kopiert anstatt einen Link erzeugt.

Ne, ist schon ein richtiger Link.

Habe die Lösung jetzt gefunden:
Die Links wurden von Inno Setup erstellt. Der Pfad zu Anwendung wurde in der .lnk-Datei richtig eingegeben, es fehlte aber die Angabe "Ausführen in..." !!!

Ohne diese Angabe wird die Anwendung in dem Ordner ausgeführt, in welchem die .lnk-Datei liegt!


Problem gelöst (... zumindest muss im Inno-Setup jetzt noch das Script verändert werden)!

[DevilsCamp]

Zitat:

Zitat von enebk

Habe die Lösung jetzt gefunden:
Die Links wurden von Inno Setup erstellt. Der Pfad zu Anwendung wurde in der .lnk-Datei richtig eingegeben, es fehlte aber die Angabe "Ausführen in..." !!!

Ohne diese Angabe wird die Anwendung in dem Ordner ausgeführt, in welchem die .lnk-Datei liegt!

Auch wenn "Ausführen in..." nicht gesetzt ist:

Code:

ExtractFilePath(ParamStr(0))

sollte dennoch den Pfad zur EXE-Datei ausgeben. Welchen Wert hat ParamStr(0) bei dir?

[Relicted]

Ich weiß nicht mehr in welcher Konstellation es war aber ich habe den Effekt auch schon gehabt.
Paramstr(0) gab bei mir auch etwas anderes zurück als erwartet. Ich habe mir daher angewöhnt mit Application.ExeName zu arbeiten - da hatte ich bisher keine Probleme mit dem Aufruf.

Gruß
Reli

[mjustin]

Zitat:

Zitat von Relicted

Ich weiß nicht mehr in welcher Konstellation es war aber ich habe den Effekt auch schon gehabt.
Paramstr(0) gab bei mir auch etwas anderes zurück als erwartet. Ich habe mir daher angewöhnt mit Application.ExeName zu arbeiten - da hatte ich bisher keine Probleme mit dem Aufruf.

Gruß
Reli

Application.Exename versagt allerdings bei Diensten und DataSnap-Anwendungen. Dass ParamStr(0) auch nicht zuverlässig ist, wusste ich auch bis heute nicht. GetModuleFileName wurde in der JCL bisher anscheinend noch nicht schick a la Delphi gekapselt...

Cheers

[Meflin]

Zitat:

Zitat von Relicted

Paramstr(0) gab bei mir auch etwas anderes zurück als erwartet. Ich habe mir daher angewöhnt mit Application.ExeName zu arbeiten - da hatte ich bisher keine Probleme mit dem Aufruf.

Das ist, nun, sagen wir mal - witzig. Denn Application.ExeName benutzt doch intern nix anderes als ParamStr(0)...

[Relicted]

Zitat:

Zitat von Meflin

Zitat:

Zitat von Relicted

Paramstr(0) gab bei mir auch etwas anderes zurück als erwartet. Ich habe mir daher angewöhnt mit Application.ExeName zu arbeiten - da hatte ich bisher keine Probleme mit dem Aufruf.

Das ist, nun, sagen wir mal - witzig. Denn Application.ExeName benutzt doch intern nix anderes als ParamStr(0)...

Das ist mir wiederrum neu - aber gut habe mich auch noch ned weiter damit befasst. In diesem einen besonderen Fall funktionierte es nur so. Warum auch immer... vielleicht habe ich auch unbemerkt irgendwas anderes geändert was das beeinflusst *shrug*