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
Полезные функции