易语言DLL传递窗口组件源码

系统结构:子程序1,Call,取DLL命令地址,释放DLL,LoadLibraryA,GetProcAddress,FreeLibrary,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ _临时子程序
           |  |
           |  |------ 子程序1
  ======窗口程序集_启动窗口
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ Call
           |  |
           |  |------ 取DLL命令地址
           |  |
           |  |------ 释放DLL
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   LoadLibraryA
           |  |
           |  |---[dll]------   GetProcAddress
           |  |
           |  |---[dll]------   FreeLibrary

调用的DLL命令:

.DLL命令 LoadLibraryA, 整数型, "kernel32", "LoadLibraryA", , 载入指定的动态链接库，并将它映射到当前进程使用的地址空间。一旦载入，即可访问库内保存的资源  成功则返回库模块的句柄，零表示失败。会设置GetLastError
    .参数 lpLibFileName, 文本型, , 指定要载入的动态链接库的名称。采用与CreateProcess函数的lpCommandLine参数指定的同样的搜索顺序;

.DLL命令 GetProcAddress, 整数型, "kernel32", "GetProcAddress", , 返回函数地址
    .参数 hModule, 整数型
    .参数 lpProcName, 文本型

.DLL命令 FreeLibrary, 整数型, "kernel32", "FreeLibrary", , 释放指定的动态链接库，它们早先是用LoadLibrary ;    API函数装载的  非零表示成功，零表示失败。会设置GetLastError
    .参数 hLibModule, 整数型, , 要释放的一个库句柄在VB里使用只能用这个函数释放那些由应用程序明确装载的DLL。对LoadLibrary的每一次调用都应该有一个对应的FreeLibrary调用;