EXTRACTFILENAME — различия между версиями
Материал из Фабиус wiki
Hisava (обсуждение | вклад) (Новая страница: «ExtractFileName - это функция = Текст программы = parameters path:='' local rch,i result:=path for i:=len(path) to 1 step -…») |
Hisava (обсуждение | вклад) м |
||
| Строка 1: | Строка 1: | ||
ExtractFileName - это функция | ExtractFileName - это функция | ||
| + | Извлечение имени из каталога | ||
| + | EXTRACTFILEDRIVE(директорий) | ||
= Текст программы = | = Текст программы = | ||
Версия 12:18, 30 июня 2016
ExtractFileName - это функция
Извлечение имени из каталога
EXTRACTFILEDRIVE(директорий)
Текст программы
parameters path:=
local rch,i
result:=path
for i:=len(path) to 1 step -1
if copy(path,i,1)='\' or copy(path,i,1)='/'
result:=Right(path,len(path)-i)
return
endif
next
