NICE PATH — различия между версиями
Материал из Фабиус wiki
Hisava (обсуждение | вклад) (Новая страница: «NICE_PATH - это функция из справочника R266 = Смотрите также = Функции Delphi Полезные функц…») |
Hisava (обсуждение | вклад) м |
||
Строка 1: | Строка 1: | ||
NICE_PATH - это функция из справочника [[R266]] | NICE_PATH - это функция из справочника [[R266]] | ||
+ | |||
+ | NICE_PATH([Путь доступа = OpDataPath]) | ||
+ | |||
+ | Убирает лишние пробелы и оставляет ровно один \ в конце пути (вместо strtran(ss+'\', '\\' '\')) | ||
+ | |||
+ | = Текст программы = | ||
+ | |||
+ | Parameters raw_path:=OpDataPath | ||
+ | if rat('\', result:=atr(raw_path))!=len(result); result:=result+'\'; endif | ||
= Смотрите также = | = Смотрите также = |
Версия 09:34, 8 сентября 2016
NICE_PATH - это функция из справочника R266
NICE_PATH([Путь доступа = OpDataPath])
Убирает лишние пробелы и оставляет ровно один \ в конце пути (вместо strtran(ss+'\', '\\' '\'))
Текст программы
Parameters raw_path:=OpDataPath if rat('\', result:=atr(raw_path))!=len(result); result:=result+'\'; endif