Delphi 中获取文件类型说明
就是根据文件名,获取文件类型说明,如.bat文件,可获取到“Windows 批处理文件”代码:var FileInfo: TSHFileInfo;begin Result := INFO_UNKOWN_TYPE; //'未知类型' try SHGetFileInfo(pchar(AFileName), 0, FileInfo,
就是根据文件名,获取文件类型说明,如.bat文件,可获取到“Windows 批处理文件”代码:var FileInfo: TSHFileInfo;begin Result := INFO_UNKOWN_TYPE; //'未知类型' try SHGetFileInfo(pchar(AFileName), 0, FileInfo,