易语言API取文件图标信息源码

系统结构:获取文件关联信息,DrawIcon,DeleteObject,SHGetFileInfo,GetDC,ReleaseDC,DrawIconEx,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ _按钮_选择文件_被单击
           |  |
           |  |------ _单选框_小_被单击
           |  |
           |  |------ 获取文件关联信息
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   DrawIcon
           |  |
           |  |---[dll]------   DeleteObject
           |  |
           |  |---[dll]------   SHGetFileInfo
           |  |
           |  |---[dll]------   GetDC
           |  |
           |  |---[dll]------   ReleaseDC
           |  |
           |  |---[dll]------   DrawIconEx

调用的DLL命令:

.DLL命令 DrawIcon, 逻辑型, , "DrawIcon"
    .参数 hDC
    .参数 x
    .参数 y
    .参数 hIcon

.DLL命令 DeleteObject, 逻辑型
    .参数 hObject, 整数型

.DLL命令 SHGetFileInfo, 整数型, , "SHGetFileInfo"
    .参数 pszPath, 文本型
    .参数 dwFileAttributes, 整数型
    .参数 psfi, SHFILEINFO
    .参数 cbFileInfo, 整数型
    .参数 uFlags, 整数型

.DLL命令 GetDC, 整数型, "user32", "GetDC", , 获取指定窗口的设备场景　指定窗口的设备场景句柄，出错则为0
    .参数 hwnd, 整数型, , 将获取其设备场景的窗口的句柄。若为0，则要获取整个屏幕的DC;  

.DLL命令 ReleaseDC, 整数型, "user32", "ReleaseDC", , 释放由调用GetDC或GetWindowDC函数获取的指定设备场景。它对类或私有设备场景无效（但这样的调用不会造成损害）　执行成功为1，否则为0
    .参数 hwnd, 整数型, , 要释放的设备场景相关的窗口句柄
    .参数 hdc, 整数型, , 要释放的设备场景句柄;  

.DLL命令 DrawIconEx, 整数型, "user32", "DrawIconEx", , 描绘一个图标或鼠标指针。与DrawIcon相比，这个函数提供了更多的功能　非零表示成功，零表示失败。会设置GetLastError
    .参数 hdc, 整数型, , 要在其中画图的一个设备场景的句柄
    .参数 xLeft, 整数型, , 图标左上角的位置，用逻辑坐标表示
    .参数 yTop, 整数型, , 同上
    .参数 hIcon, 整数型, , 要描绘的图标的句柄
    .参数 cxWidth, 整数型, , 希望的图标宽度和高度。图标会自动缩放，与指定的值相符
    .参数 cyWidth, 整数型, , 同上
    .参数 istepIfAniCur, 整数型, , 如果hIcon是个动画指针，那么该参数指定描绘动画中的哪幅图象。注意Win32不能区分图标和指针
    .参数 hbrFlickerFreeDraw, 整数型, , 如设为一个刷子句柄，那么函数会将图标画入一幅内存位图，并用背景色填充。随后，将图象直接复制到指定的位置。这样做可绘图时减少闪烁（因为画图过程中重现）
    .参数 diFlags, 整数型, , 下述常数之一：;DI_COMPAT：描绘标准的系统指针，而不是指定的图象;DI_DEFAULTSIZE：忽略cxWidth和cyWidth设置，并采用原始的图标大小;DI_IMAGE：绘图时使用图标的XOR部分（即图标没有透明区域）;DI_MASK：绘图时使用图标的MASK部分（如单独使用，可获得图标的掩模）;DI_NORMAL：用常规方式绘图（合并 DI_IMAGE 和 DI_MASK）;