Delphi获取文件名、文件名不带扩展名、文件名的方法；delphi 获取文件所在路径