ExtractFilePath aus einem String mit zwei Dateiangaben

[juergen]

Hallo und herzlich willkommen in der DP!

ich würde es für einen Anwendungsfall so machen wie himitsu es schon gesagt hat, wenn der Parameter durch ein Leerzeichen eingeleitet wird unfd im Pfad keine Leerzeichen vorhanden sind.

Delphi-Quellcode:

ExtractFilePath(copy('"C:\Hello\You.exe C:\Bye\You.exe"',
  pos(' ', ('"C:\Hello\You.exe C:\Bye\You.exe"')), Length('"C:\Hello\You.exe C:\Bye\You.exe"')));

Ich hoffe ich habe jetzt alles richtig getippt.

[juergen]

Hallo,

die Regel scheint zu sein, dass bis zum 2. Backslash der Dateipfad ist, oder?
Dann vllt. so:

Delphi-Quellcode:

s := '"C:\Hello\You.exe C:\Bye\You.exe"';
  (ExtractFilePath(copy(s, 2, (posex('\', (s), 5)))));

Edit: Sorry, ich hatte beim Überprüfen mit Delphi eben festgestellt, dass ich einen Denkfehler hatte.
Der jetzige Code sollte funktionieren

[Dalai]

Ich hatte vor wenigen Wochen ebenfalls mit diesem Thema zu tun. Erst hatte ich versucht, das alles selbst mit entsprechender Stringbearbeitung zu machen, bis mir irgendwann auffiel, dass Microsoft diese Arbeit schon getan hat. Und da man das Rad nicht immer wieder neu erfinden muss, hab ich dann auf diese Funktionen zurückgegriffen. Stichworte: PathRemoveArgs, PathUnquoteSpaces, ggf. PathAddExtension und noch ein paar andere. Ich empfehle daher dringend, diese Funktionen zu benutzen statt der manuellen Bearbeitung der Strings.

Es gibt sogar Deklarationen der Funktionen hier im Forum für den Fall, dass sie in deinem Delphi fehlen sollten. Für ein Unicode-Delphi sollte man allerdings die Deklarationen anpassen (Stichwort $IFDEF UNICODE).

MfG Dalai