Anwendung soll den Path ermitteln, indem die liegt

[MaBuSE]

Zitat von richard_boderich:

welche methode waere nach eurer einschaetzung aus sich einer moeglichst hohen kompatibilität zu verschiedenen OS-versionen den besser geeignet ?

Das ist Egal.

[sakura]

Zitat von richard_boderich:

frage aber noch, welche methode waere nach eurer einschaetzung aus
sich einer moeglichst hohen kompatibilität zu verschiedenen OS-versionen den besser geeignet ? oder ist das egal?

Ich zitiere mal den Borland-Source Code von Application.ExeName (Unit Forms.pas, © Borland)

Delphi-Quellcode:

function TApplication.GetExeName: string;
begin
  Result := ParamStr(0);
end;

......

[Darty]

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
var
  Exe_Direktory: String;
begin
  Exe_Direktory := ExtractFilePath(Application.ExeName);  //Pfad von Exe Programm
end;

[elninjo24]

Path := ExtractFilePath (Application.ExeName); Hilft garantiert ! Dieser Aufruf setzt auch automatisch am Ende ein \ Backslash.

Habe ich in meinen Anwendungen ständig im Gebrauch.

Gruß

Marco

[MaBuSE]

Ich frage mich, warum hier immer wieder die selben Lösungen geposted werden.
Die Frage wurde doch hinreichend beantwortet.
Der Fragende hat sich ja auch schon bedankt, alle Fragen sind beantwortet.