怎么从文件的完整路径中取出文件名和最后一个文件夹名称

Question

如：c:\mysoft\test.rar获得test.rar
和 mysoft

Answer 1

copy(lastpos('\',path)+1,length(path)lastpos('\',path))

Answer 2

还少问了一个，还要一个test.rar不要后缀名

Answer 3

lastpos函数是哪个unit中的，怎么没有找到呢

Answer 4

例：path := 'c:\mysoft\test.rar';
var
  FileStr, FloderStr: String;
begin
  FileStr := ExtractFileName(path);
  FloderStr := ExtractFileName(ExtractFileDir(path));
end;
///////
ExtractFileDir 函数 返回驱动器和路径 
ExtractFileExt 函数 返回文件的后缀 
ExtractFileName 函数 返回文件名 
ExtractFilePath 函数 返回指定文件的路径