易语言网页事件挂接源码

系统结构:E_event,语言,超时,加入脚本,计算表达式,执行,运行,取错误,清除,写Html,加入对象,加入Dom,加入E函数,加入E类,QueryInterface,AddRef,Release,GetTypeInfoCount,GetTypeInfo,GetIDsOfNames,Invoke,创建Dispatch接口_类,创建Dispatch接口_函数,Call_EC2,Call_E,指针_取地址,指针_变体型,api_CoInitialize,api_CoUninitialize,api_WideCharToMultiByte,转换_字节集到变体型,转换_字节集到变体组,指针_Dispatch,指针_整数型,指针_变体数据,转换_指针到对象,转换_指针到变体型,API_CallWindowProcA2,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ __启动窗口_空闲
           |  |
           |  |------ E_event
           |  |
           |  |
======EC_SCRIPT
           |  |
           |  |------ _初始化
           |  |
           |  |------ _销毁
           |  |
           |  |------ 语言
           |  |
           |  |------ 超时
           |  |
           |  |------ 加入脚本
           |  |
           |  |------ 计算表达式
           |  |
           |  |------ 执行
           |  |
           |  |------ 运行
           |  |
           |  |------ 取错误
           |  |
           |  |------ 清除
           |  |
           |  |------ 写Html
           |  |
           |  |------ 加入对象
           |  |
           |  |------ 加入Dom
           |  |
           |  |------ 加入E函数
           |  |
           |  |------ 加入E类
           |  |
           |  |
======Interface
           |  |
           |  |------ QueryInterface
           |  |
           |  |------ AddRef
           |  |
           |  |------ Release
           |  |
           |  |------ GetTypeInfoCount
           |  |
           |  |------ GetTypeInfo
           |  |
           |  |------ GetIDsOfNames
           |  |
           |  |------ Invoke
           |  |
           |  |------ 创建Dispatch接口_类
           |  |
           |  |------ 创建Dispatch接口_函数
           |  |
           |  |------ Call_EC2
           |  |
           |  |------ Call_E
           |  |
           |  |------ 指针_取地址
           |  |
           |  |------ 指针_变体型
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   api_CoInitialize
           |  |
           |  |---[dll]------   api_CoUninitialize
           |  |
           |  |---[dll]------   api_WideCharToMultiByte
           |  |
           |  |---[dll]------   转换_字节集到变体型
           |  |
           |  |---[dll]------   转换_字节集到变体组
           |  |
           |  |---[dll]------   指针_Dispatch
           |  |
           |  |---[dll]------   指针_整数型
           |  |
           |  |---[dll]------   指针_变体数据
           |  |
           |  |---[dll]------   转换_指针到对象
           |  |
           |  |---[dll]------   转换_指针到变体型
           |  |
           |  |---[dll]------   API_CallWindowProcA2

调用的DLL命令:

.DLL命令 api_CoInitialize, 整数型, "ole32.dll", "CoInitialize", , 初始化对象开始
    .参数 pvReserved, 整数型, , 0

.DLL命令 api_CoUninitialize, 整数型, "ole32.dll", "CoUninitialize", , 初始化对象结束

.DLL命令 api_WideCharToMultiByte, 整数型, "kernel32.dll", "WideCharToMultiByte", 公开, 将通配符映像为多字节
    .参数 CodePage, 整数型
    .参数 dwFlags, 整数型
    .参数 lpWideCharStr, 字节集
    .参数 cchWideChar, 整数型
    .参数 lpMultiByteStr, 字节集
    .参数 cchMultiByte, 整数型, 传址
    .参数 lpDefaultChar, 整数型
    .参数 lpUsedDefaultChar, 整数型

.DLL命令 转换_字节集到变体型, , "kernel32.dll", "RtlMoveMemory", , 参数只能提供指针变量
    .参数 目的变量, 变体型, , pTo
    .参数 源变量, 字节集, , uFrom
    .参数 尺寸, 整数型, , lSize

.DLL命令 转换_字节集到变体组, , "kernel32.dll", "RtlMoveMemory", , 参数只能提供指针变量
    .参数 目的变量, 变体型, 数组, pTo
    .参数 源变量, 字节集, , uFrom
    .参数 尺寸, 整数型, , lSize

.DLL命令 指针_Dispatch, 整数型, "kernel32.dll", "SetHandleCount", 公开, 参数必须为指针变量
    .参数 变量, IDispathch

.DLL命令 指针_整数型, 整数型, "kernel32.dll", "SetHandleCount", 公开, 参数必须为指针变量
    .参数 变量, 整数型, 传址

.DLL命令 指针_变体数据, 整数型, "kernel32.dll", "SetHandleCount", 公开, 参数必须为指针变量
    .参数 变量, 变体型

.DLL命令 转换_指针到对象, , "kernel32.dll", "RtlMoveMemory", 公开, 参数只能提供指针变量
    .参数 目的变量, 对象, , pTo
    .参数 源变量, 整数型, 传址, uFrom
    .参数 尺寸, 整数型, , lSize

.DLL命令 转换_指针到变体型, , "kernel32.dll", "RtlMoveMemory", 公开, 参数只能提供指针变量
    .参数 目的变量, 变体型, , pTo
    .参数 源变量, 整数型, , uFrom
    .参数 尺寸, 整数型, , lSize

.DLL命令 API_CallWindowProcA2, 整数型, , "CallWindowProcA"
    .参数 动态调用代码, 字节集
    .参数 子程序, 整数型
    .参数 参数, 整数型, 数组
    .参数 参数数目, 整数型
    .参数 是否C调用, 逻辑型