Существует ли стандартная функция?

← →
stone © (2003-01-22 13:59) [0]

Существует ли стандартная функция приводящая, например C:\MyDir и C:\MyDir\ к виду C:\MyDir\. Или нужно самому писать что-то вроде этого:

function Dir(ADir:string):string;
begin
if not (copy(ADir, length(ADir), 1) = "\") then
Result := ADir+"\"
else
Result := ADir;
end;

← →
REA © (2003-01-22 14:07) [1]

IncludeTrailingBackslash или IncludeTrailingPathDelimiter в новых версиях Delphi.

← →
Ч (2003-01-22 14:08) [2]

? ExpandFileName

Существует ли стандартная функция? Найти похожие ветки