Pfadangaben automatisch anpassen

[jbg]

Wie wäre es damit:

Code:

var Dir: string;
begin
  Dir := ExtractFilePath(ExcludeTrailingPathDelimiter(UserAngabe));
end;

An Dir kannst du jetzt die relativen Verzeichnisse anhängen