易语言提取最佳图标源码

系统结构:获取大图标,回调函数,枚举资源,EnumFunc,Jmp,提取资源,LoadLibrary,FreeLibrary,EnumResourceNames,FindResource,SizeofResource,LoadResource,FreeResource,LockResource,

======获取图标
           |  |
           |  |------ 获取大图标
           |  |
           |  |------ 回调函数
           |  |
           |  |
======提取资源
           |  |
           |  |------ 枚举资源
           |  |
           |  |------ EnumFunc
           |  |
           |  |------ Jmp
           |  |
           |  |------ 提取资源
           |  |
           |  |
======窗口程序集1
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   LoadLibrary
           |  |
           |  |---[dll]------   FreeLibrary
           |  |
           |  |---[dll]------   EnumResourceNames
           |  |
           |  |---[dll]------   FindResource
           |  |
           |  |---[dll]------   SizeofResource
           |  |
           |  |---[dll]------   LoadResource
           |  |
           |  |---[dll]------   FreeResource
           |  |
           |  |---[dll]------   LockResource

调用的DLL命令:

.DLL命令 LoadLibrary, 整数型, , "LoadLibraryA"
    .参数 lpFileName, 文本型

.DLL命令 FreeLibrary, 逻辑型
    .参数 hModule, 整数型

.DLL命令 EnumResourceNames, 逻辑型, , "EnumResourceNamesA"
    .参数 hModule, 整数型
    .参数 lpszType, 整数型
    .参数 lpEnumFunc, 子程序指针
    .参数 lParam, 整数型

.DLL命令 FindResource, 整数型, , "FindResourceA"
    .参数 hModule, 整数型
    .参数 lpName, 整数型
    .参数 lpType, 整数型

.DLL命令 SizeofResource, 整数型
    .参数 hModule, 整数型
    .参数 hResInfo, 整数型

.DLL命令 LoadResource, 整数型
    .参数 hModule, 整数型
    .参数 hResInfo, 整数型

.DLL命令 FreeResource, 逻辑型
    .参数 hglbResource, 整数型

.DLL命令 LockResource, 整数型
    .参数 hResData, 整数型