Zitat von
Satty67:
Zitat von
DevilsCamp:
Und wie berechnest du
Alles vor "Mein Vorschlag" war nur eine Feststellung, was der Code des Ausgangsposters meiner Meinung nach macht. Der erwartet scheinbar einen bereits bekannten BasePath.
Ginge es nur um den direkt übergeordneten Ordner der Datei, könnte man sich die Übergabe von aBasePath ja gleich sparen.
Sorry, ich war irgendwie der Meinung, dass ich den Thread-Ersteller zitiere
Aber zurück zum
OT:
Der Thread-Ersteller möchte den Verzeichnisnamen des Verzeichnisses bekommen, in dem die Datei liegt. Daher müsste gelten:
aBasepath := ExtractFilePath(aFilename)
Das liefert allerdings immer einen leeren string, weil das dritte Argument von Copy eine negative Zahl ist (weil PosEx in dem Fall immer 0 zurück gibt). Und in dem Fall wäre der Vorschlag von DeddyH vielleicht nicht die schönste, aber eine schnelle Lösung.
Man könnte z.B. auch aFilename an den '\' splitten und in ein Array speichern und anschliessend
ArrayVar[High(ArrayVar) - 1]
zurück geben (ArrayVar[High(ArrayVar)] ist ja dann der Dateiname selber)