Forum: Sonstige Fragen zu Delphi
Delphi
by marabu,
1. Dez 2005
Hallo sakura,
er hat doch nur D5 - die Funktion muss er da erst noch selbst implementieren...
Freundliche Grüße vom marabu
Forum: Sonstige Fragen zu Delphi
Delphi
by marabu,
1. Dez 2005
Das heißt, dass du diesen Code nicht ohne Änderungen nach Linux portieren kannst. In den neueren Delphi-Versionen gibt es die portierbare Funktion ExcludeTrailingPathDelimiter().
marabu
Forum: Sonstige Fragen zu Delphi
Delphi
by marabu,
1. Dez 2005
Mein Scherflein:
function ExtractParentDir(dir: string; noPath: boolean): string;
begin
dir := ExtractFilePath(ExcludeTrailingBackslash(dir));
if noPath
then Result := ExtractFileName(ExcludeTrailingBackslash(dir))
else Result := dir;
end;