bis zum letzten backslash löschen :)

[the_seed]

Hi, mein problem ist folgendes ich habe einen filemanager und eine variable die den aktuellen pafd enthält ... nur möchte ich eine rückgängis funktion einbauen das wenn zb pfad = c:\windows\system\ ist wie kann ich es erreichen das die letzte pfadangabe ('system\') entfernt wird ?also das man ins übergeordnete verueichnis kommt ?

[Luckie]

Geh mit einer for-Schleife von hinten nach vorne den String durch und überprüfe das aktuelle zeichen. Hast du deinen '\' gefunden, Position merken und mit copy den String rauskopieren.

[Christian Seehase]

Moin The Seed,

oder Du nimmst ExtractFilepath:

Delphi-Quellcode:

ExtractFilepath(copy('c:\windows\system\',1,length('c:\windows\system\')-1))

Statt der Konstanten dann natürlich eine Variable.
Es muss nur sichergestellt sein, dass der Wert auch auf \ endet.
Endet er hingegen garantiert nicht auf \ kannst Du Dir sogar das copy(...) sparen.

[Muetze1]

Moin!

Delphi-Quellcode:

ExtractFilePath(ExcludeTrailingBackslash(Pfad));

MfG
Muetze1

[Muetze1]

Zitat:

Zitat von Muetze1

Moin!

Delphi-Quellcode:

Pfad := ExtractFilePath(ExcludeTrailingBackslash(Pfad));

MfG
Muetze1