如何获得一个文件文件名（不包括扩展名）

Question

好象没有这个函数
可以用这个语句代替：
filename:=copy(extractfilename(FileName),1,length(FileName)-4);

Answer 1

filename:=copy(trim(extractfilename('c:\1.txt')),1,pos( '.',s)-1);

Answer 2

9igogo(就爱狗狗) 写得是对的
ExtractFileName这个函数用得非常多

Answer 3

我我也不记得有这么一个函数只获取文件名
filename1:=copy(extractfilename(FileName),1,length(extractfilename(FileName))-4);

Answer 4

9igogo(就爱狗狗) is right!