SHGetFileInfo是一個程式代碼,意思是獲得系統圖示列表。
舉例,詳析,
舉例
1.獲得系統圖示列表:
//取得系統圖示列表
uses
ShellAPI
var
ImageListHandle : THandle;
FileInfo: TSHFileInfo;
//小圖示
ImageListHandle := SHGetFileInfo('C:\',
0,
FileInfo,
SizeOf(FileInfo),
SHGFI_ SYSICONIND EX or SHGFI_SMALLICON);
//把圖示列表同一個名叫ListView1的ListView控制項的小圖示關聯。
SendMessage( ListView1.Handle, LVM_SETIMAGELIST, LVSIL_SMALL, ImageListHandle);
//大圖示
ImageListHandle := SHGetFileInfo('C:\',
0,
FileInfo,
SizeOf(FileInfo),
SHGFI_SYSICONINDEX or SHGFI_LARGEICON);
//把圖示列表同一個名叫ListView1的ListView控制項的大圖示關聯。
SendMessage(ListView1.Handle, LVM_SETIMAGELIST, LVSIL_NORMAL, ImageListHandle);
2.獲得一個檔案的顯示名和圖示
var
sfi: TSHFileInfo;
IconIndex : Integer;
//取圖示的索引號等信息
SHGetFileInfo(PAnsiChar(FileName),
0,
sfi,
sizeof(TSHFileInfo),
ShellAPI.SHGFI_DISPLAYNAME or ShellAPI.SHGFI_TYPENAME or ShellAPI.SHGFI_LARGEICON or ShellAPI.SHGFI_ICON);
//顯示名和圖示在系統圖示列表中的編號就分別在sfi.szDisplayName和sfi.iIcon中
詳析
SHGetFileInfo函式
function SHGetFileInfo(
LPCTSTRpszPath,
DWORDdwFileAttributes,
UINTcbFileInfo,
UINTuFlags
);
pszPath 參數:指定的檔案名稱。
當uFlags的取值中不包含 SHGFI_PIDL時,可直接指定;
當uFlags的取值中包含 SHGFI_PIDL時pszPath要通過計算獲得,不能直接指定;
dwFileAttributes參數:檔案屬性。
僅當uFlags的取值中包含SHGFI_USEFILEATTRIBUTES時有效,一般不用此參數;
SHFILEINFO結構定義如下:
typedef struct _SHFILEINFO
{
HICON hIcon;//檔案的圖示句柄
int iIcon;//圖示的系統索引號
DWORD dwAttributes;//檔案的屬性值
char szDisplayName[MAX_PATH];//檔案的顯示名
char szTypeName[80];//檔案的類型名
} SHFILEINFO;
此外,這個結構總是用於返回數據到調用程式, 並且從不需要初始化。唯一可以包含信息來影響函式行為的 是dwAttributes成員,在後面將進一步給出解釋。顯然, 駕馭SHGetFileInfo()函式各種行為的所有興趣都集中在對 uFlags變數值的設定上。絕大多數情況下, 信息經由psfi緩衝返回,但也有些情況,回應可以有效地包含在函式的DWORD返回之中。
cbFileInfo 參數:psfi的比特值;
uFlags 參數:指明需要返回的檔案信息標識符,常用的有以下常數:
SHGFI_ICON; //獲得圖示
SHGFI_DISPLAYNAME; //獲得顯示名
SHGFI_TYPENAME; //獲得類型名
SHGFI_ATTRIBUTES; //獲得屬性
SHGFI_LARGEICON; //獲得大圖示
SHGFI_SMALLICON; //獲得小圖示
SHGFI_PIDL; // pszPath是一個標識符
SHGFI_USEFILEATTRIBUTES;//不會訪問第一個參數所指定的檔案,使函式認為在pszPath參數中傳遞的檔案是存在的,此時,它可以獲得擴展名,並且搜尋註冊表來得到圖示和類型名信息。
此外,這個結構總是用於返回數據到調用程式,並且從不需要初始化。唯一可以包含信息來影響函式行為的是dwAttributes成員,在後面將進一步給出解釋。顯然,駕馭SHGetFileInfo()函式各種行為的所有興趣都集中在對uFlags變數值的設定上。絕大多數情況下,信息經由psfi緩衝返回,但也有些情況,回應可以有效地包含在函式的DWORD返回之中。
函式SHGetFileInfo()的返回值也隨uFlags的取值變化而有所不同。
可見通過調用SHGetFileInfo()可以由psfi參數得到檔案的圖示句柄。但要注意在uFlags參數中不使用SHGFI_PIDL時,SHGetFileInfo()不能獲得“我的電腦”等虛似資料夾的信息。
應該注意的是,在調用SHGetFileInfo()之前,必須使用 CoInitialize 或者OleInitialize 初始化COM,否則表面上能夠使用,但是會造成不安全或者喪失部分功能。例如,一個常見的例子:如果不初始化COM,那么調用該函式就無法得到.htm/.mht/.xml檔案的圖示。