NICE PATH — различия между версиями
Материал из Фабиус wiki
Hisava (обсуждение | вклад) (Новая страница: «NICE_PATH - это функция из справочника R266 = Смотрите также = Функции Delphi Полезные функц…») |
Hisava (обсуждение | вклад) м |
||
| (не показано 6 промежуточных версий этого же участника) | |||
| Строка 1: | Строка 1: | ||
| − | NICE_PATH - это функция из справочника [[R266]] | + | [[NICE_PATH]] - это функция из справочника [[R266]] |
| − | + | Убирает лишние пробелы и оставляет ровно один \ в конце пути (вместо strtran(ss+'\', '\\' '\')) | |
| + | [[NICE_PATH]]( [Путь доступа = OpDataPath] ) | ||
| + | = Пример = | ||
| + | [[NICE_PATH]]( 'D:' ) | ||
| + | [[Файл:08-09-2016 9-39-04.png]] | ||
| + | = Текст = | ||
| + | Parameters raw_path:=OpDataPath | ||
| + | if [[rat]]('\', result:=[[atr]](raw_path))!=[[len]](result); result:=result+'\'; endif | ||
= Смотрите также = | = Смотрите также = | ||
| + | [[Полезные функции]] | ||
[[Функции Delphi]] | [[Функции Delphi]] | ||
| − | [[ | + | [[Trim_DelSl]] |
Текущая версия на 15:28, 13 июня 2017
NICE_PATH - это функция из справочника R266
Убирает лишние пробелы и оставляет ровно один \ в конце пути (вместо strtran(ss+'\', '\\' '\'))
NICE_PATH( [Путь доступа = OpDataPath] )
Пример
NICE_PATH( 'D:' )
Текст
Parameters raw_path:=OpDataPath if rat('\', result:=atr(raw_path))!=len(result); result:=result+'\'; endif
