Slash am Ende des Verzeichnispfad entfernen

[NewbieNew]

Hallo,

Ich möchte gerne den letzten Slash am Verzeichnispfad entfernen. Mit ExtractFilePath(Application.ExeName) hole ich mir den Pfad wo die Anwendung sich gerade befindet. Der Pfad wird aber mit einem Abschließenden Slash "\" übergeben z.B. "C:\Programme\Anwendung\"

Wie könnte man die Übergabe ohne Abschließenden Slash realisieren "C:\Programme\Anwendung"

Delphi-Quellcode:

var
Dir: String;

Dir := ExtractFilePath(Application.ExeName);

MFG
Newbie

[DeddyH]

Versuch es mal mit ExcludeTrailingPathDelimiter.

[mkinzler]

Schau dir mal ExcludeTrailingBackSlash() an

[himitsu]

ExtractFileDir ?

[NewbieNew]

Danke für die schnellen Antworten. Ich habe mir in der Delphi Hilfe mal "ExcludeTrailingPathDelimiter" angeschaut und so gelöst

Delphi-Quellcode:

var
s, Dir: String;

s := ExtractFilePath(Application.ExeName); 
Dir :=  ExcludeTrailingPathDelimiter(s);

Alle anderen Vorschläge hab ich noch nicht getestet also nicht gleich erschlagen :mrgreen:

[himitsu]

Kurz und Knapp ... schau mal, was deine OH zu meinem Vorschlag schreibt :zwinker:

[NewbieNew]

Delphi-Quellcode:

Dir := ExtractFileDir(Application.ExeName);

Zitat:

Kurz und Knapp ... schau mal, was deine OH zu meinem Vorschlag schreibt Zwinkern

Die Funktion extrahiert die Laufwerks- und Verzeichnisinformationen aus dem angegebenen Dateinamen.


DANKE!