Einzelnen Beitrag anzeigen

Benutzerbild von Deep-Sea
Deep-Sea

Registriert seit: 17. Jan 2007
907 Beiträge
 
Delphi XE2 Professional
 
#8

Re: Directory List Box - gewählten Eintrag auslesen

  Alt 23. Nov 2007, 11:01
Delphi-Quellcode:
function LastDir(const APath: String): String;
begin
  Result := ExcludeTrailingBackslash(APath);
  Delete(Result, 1, LastDelimiter(PathDelim, Result));
end;
Sollte ja auch gehen, oder?
Chris
Die Erfahrung ist ein strenger Schulmeister: Sie prüft uns, bevor sie uns lehrt.
  Mit Zitat antworten Zitat