Einzelnen Beitrag anzeigen

Satty67

Registriert seit: 24. Feb 2007
Ort: Baden
1.566 Beiträge
 
Delphi 2007 Professional
 
#5

Re: Verzeichnis aus Dateinamen extrahieren

  Alt 18. Mai 2009, 15:30
Man muss folgendes übergeben:

C:\meineApplikation\
C:\meineApplikation\meineDaten\meineDatei.txt

um dann meineDaten zu bekommen?

Mein Vorschlag, da ich kein PosEx habe:
Delphi-Quellcode:
function GetFileDir(const aBasepath, aFilename: string): string;
begin
  Result := ExtractFilePath(aFileName);
  Delete(Result, 1, Length(aBasePath));
end;
ExcludeTrailingBackslash, falls man D5 hat und den Backslash nicht will

@eddyH
Wenn mehr als ein Ordner-Zweig zw. aBasepath und aFilename liegt, wird das nix.
  Mit Zitat antworten Zitat