caption:= ExtractFileExt(‘带路径,带扩展名的文件名’);//返回的就是扩展名
caption:= ChangeFileExt(ExtractFileName(‘带路径,带扩展名的文件名’),'')//返回的就是不带路径,不带扩展名的文件名
caption:= ExtractFileExt(‘带路径,带扩展名的文件名’);//返回的就是扩展名
caption:= ChangeFileExt(ExtractFileName(‘带路径,带扩展名的文件名’),'')//返回的就是不带路径,不带扩展名的文件名