易语言TTL测试源码

系统结构:输出信息,十六进制文本到整数,创建管道,创建进程,读文件,关闭句柄,获取进程状态,SendMessageA,

======窗口程序集1
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ 输出信息
           |  |
           |  |------ __启动窗口_可否被关闭
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ 十六进制文本到整数
           |  |
           |  |------ _按钮2_被单击
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   创建管道
           |  |
           |  |---[dll]------   创建进程
           |  |
           |  |---[dll]------   读文件
           |  |
           |  |---[dll]------   关闭句柄
           |  |
           |  |---[dll]------   获取进程状态
           |  |
           |  |---[dll]------   SendMessageA

调用的DLL命令:

.DLL命令 创建管道, 整数型, , "CreatePipe"
    .参数 输出管道, 整数型, 传址
    .参数 输入管道, 整数型, 传址
    .参数 管道属性, security属性, 传址
    .参数 尺寸, 整数型

.DLL命令 创建进程, 整数型, , "CreateProcessA"
    .参数 程序名称, 整数型, , 32位程序用，可设为文本型
    .参数 命令行, 文本型, 传址
    .参数 进程属性, security属性, 传址
    .参数 线程属性, security属性, 传址
    .参数 参数一, 整数型
    .参数 参数二, 整数型
    .参数 参数三, 整数型, 传址
    .参数 运行目录, 整数型, , 如需指定运行目录设为文本行
    .参数 启动信息, 启动信息, 传址
    .参数 进程信息, 进程信息, 传址

.DLL命令 读文件, 整数型, , "ReadFile"
    .参数 文件号, 整数型
    .参数 缓存, 字节集, 传址
    .参数 读取尺寸, 整数型
    .参数 实际尺寸, 整数型, 传址
    .参数 参数, 整数型

.DLL命令 关闭句柄, 整数型, , "CloseHandle"
    .参数 句柄, 整数型

.DLL命令 获取进程状态, 整数型, , "GetExitCodeProcess"
    .参数 进程号, 整数型
    .参数 进程状态, 整数型, 传址

.DLL命令 SendMessageA, 整数型
    .参数 hwnd
    .参数 msg
    .参数 dw1
    .参数 dw2