Функция IncludeTrailingBackslash ( const S: string ): string;
Данная функция поддерживается только в Delphi 5 и выше
Модуль: SysUtils
Описание
Функция добавляет к строке, обозначающей путь к файлу, символ наклонной влево черты '\'.
Данная функция проверяет, стоит ли в конце строки символ наклонной влево черты. Если исходный путь содержит в конце символ '\', то в качестве результата функция возвращает исходную строку, а в случае его отсутствия добавляет символ '\' в конец строки и возвращает полученную строку.
Исходная строка определяется параметром S.
Функция поддерживает работу с многобайтовыми наборами символов (MBCS).
Пример var
Path: string; begin
Path:= IncludeTrailingBackslash('C:\MyDir'); // Path:= 'C:\MyDir\' end;