WINSHELLAPI DWORD WINAPI SHGetFileInfo(

    LPCTSTR pszPath,

    DWORD dwFileAttributes,

    SHFILEINFO FAR *psfi,

    UINT cbFileInfo,

    UINT uFlags

);

pszPath 参数:指定的文件名。
 当uFlags的取值中不包含 SHGFI_PIDL时,可直接指定;
 当uFlags的取值中包含 SHGFI_PIDL时pszPath要通过计算获得,不能直接指定;

dwFileAttributes参数:文件属性。
 仅当uFlags的取值中包含SHGFI_USEFILEATTRIBUTES时有效,一般不用此参数;

psfi 参数:返回获得的文件信息,是一个记录类型,有以下字段:
  _SHFILEINFOA = record
    hIcon: HICON;                      { out: icon }  //文件的图标句柄
    iIcon: Integer;                    { out: icon index }     //图标的系统索引号
    dwAttributes: DWORD;               { out: SFGAO_ flags }    //文件的属性值
    szDisplayName: array [0..MAX_PATH-1] of  AnsiChar; { out: display name (or path) }  //文件的显示名
    szTypeName: array [0..79] of AnsiChar;             { out: type name }      //文件的类型名
  end;

cbFileInfo 参数:psfi的比特值;

uFlags 参数:指明需要返回的文件信息标识符,常用的有以下常数:
    SHGFI_ICON;           //获得图标
    SHGFI_DISPLAYNAME;    //获得显示名
    SHGFI_TYPENAME;       //获得类型名
    SHGFI_ATTRIBUTES;     //获得属性
    SHGFI_LARGEICON;      //获得大图标
    SHGFI_SMALLICON;      //获得小图标
    SHGFI_PIDL;           // pszPath是一个标识符
函数SHGetFileInfo()的返回值也随uFlags的取值变化而有所不同。

//取得系统图标列表

uses

 ShellAPI

var

  ImageListHandle : THandle;

  FileInfo: TSHFileInfo;

//小图标

ImageListHandle := SHGetFileInfo('C:/',

                           ,

                           FileInfo,

                           SizeOf(FileInfo),

                           SHGFI_SYSICONINDEX or SHGFI_SMALLICON);

//把图标列表同一个名叫ListView1的ListView控件的小图标关联。

SendMessage(ListView1.Handle, LVM_SETIMAGELIST, LVSIL_SMALL, ImageListHandle);

//大图标

ImageListHandle := SHGetFileInfo('C:/',

                           ,

                           FileInfo,

                           SizeOf(FileInfo),

                           SHGFI_SYSICONINDEX or SHGFI_LARGEICON);

//把图标列表同一个名叫ListView1的ListView控件的大图标关联。

SendMessage(ListView1.Handle, LVM_SETIMAGELIST, LVSIL_NORMAL, ImageListHandle);

var

  sfi: TSHFileInfo;

 IconIndex : Integer;

//取图标的索引号等信息

SHGetFileInfo(PAnsiChar(FileName),

                ,

                sfi,

                sizeof(TSHFileInfo),

                ShellAPI.SHGFI_DISPLAYNAME or ShellAPI.SHGFI_TYPENAME or ShellAPI.SHGFI_LARGEICON or ShellAPI.SHGFI_ICON);

//显示名和图标在系统图标列表中的编号就分别在sfi.szDisplayName和sfi.iIcon中