Ich denke mal das Gewünschte kann man so erreichen
Delphi-Quellcode:
function EnsureDir( const s: string ): string;
begin
Result := ExtractDir( IncludeTrailingPathDelimiter( s ) );
end;
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ea 0a 4c 14 0d b6 3a a4 c1 c5 b9
dc 90 9d f0 e9 de 13 da 60)