EXTRACTFILENAME

Материал из Фабиус wiki
Перейти к: навигация, поиск

EXTRACTFILENAME - это функция

Извлечение имени из каталога

EXTRACTFILENAME( директорий )

Текст

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

Смотрите также

Функции Delphi

Полезные функции