从文件名删除路径

Question

我正在开发一个程序，需要将文件名解析为TTextField。如何删除文件扩展名，我已经知道（或认为我可以这样做）：

var 
    FName: String; 
    FPath: String; 

begin 
    FPath := OpenDialog1.FileName; 
    FName := ChangeFileExt(FPath, ''); 
end; 

但我怎么可以从FName删除的文件路径？

Answer 1

只需添加ExtractFileName(FName);

Answer 2

看看SysUtils.ExtractFileName。我想这就是你要找的。

Answer 3

在新德尔福的版本也有TPath.GetFileName从System.IOUtils