ExcludeTrailingPathDelimiter defekt

[BUG]

Ich würde SirRufo zustimmen: Vom Namen her ist das Ding ist eine Stringfunktion, die nichts über Semantik weiß.
Der Artikel hier ist vielleicht ganz interessant für dich.

[jaenicke]

Nun, eine Standardverwendung ist z.B. Zum Zusammenbauen eines Verzeichnis-Strings.
Wenn die Funktionen da nicht immer gleich funktionieren würden, kämen ggf. Verzeichnisse mit doppelten Pfadtrennzeichen usw. heraus.

[Sir Rufo]

Ich denke mal das Gewünschte kann man so erreichen

Delphi-Quellcode:

function EnsureDir( const s: string ): string;
begin
  Result := ExtractDir( IncludeTrailingPathDelimiter( s ) );
end;