function  NormalDir

Наверх  Предыдущая  Последующая |

function NormalDir(ADirName : string) : string;

 

Производит нормализацию имени папки. Нормализация предполагает:

Удаление пробелов в начале и конце имени папки
Производит замену "/" на "\"
Производит удаление повторяющихся слешей (например, C:\\abc). Исключение - это парный слеш в начале сетевого пути
При необходимости добавляет слеш в конце пути
Замену макросов на их значения. Подробнее про макросы см. в разделе "макросы, допустимые в именах файлов"

 

Данная функция удобна в различных процедурах, производящих обработку каталогов.

 

Примеры:

 

NormalDir('c:\test') = 'c:\test\'

NormalDir('c:\\test') = 'c:\test\'

NormalDir('c:\\test/abc/') = 'c:\test\abc\'

NormalDir('%SysDisk%:\\test') = 'c:\test\'