易语言imdisk辅助源码

系统结构:匿名管道运行DOS,读管道,写管道,创建匿名管道,获取启动信息_,创建进程,读文件,写文件,关闭句柄,结束进程,打开进程句柄,

======窗口程序集1
           |  |
           |  |------ _按钮创建_被单击
           |  |
           |  |------ _选择框2_被单击
           |  |
           |  |------ _按钮卸载_被单击
           |  |
           |  |------ _按钮加载_被单击
           |  |
           |  |------ _按钮扩展_被单击
           |  |
           |  |
======集_模块
           |  |
           |  |------ 匿名管道运行DOS
           |  |
           |  |------ 读管道
           |  |
           |  |------ 写管道
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   创建匿名管道
           |  |
           |  |---[dll]------   获取启动信息_
           |  |
           |  |---[dll]------   创建进程
           |  |
           |  |---[dll]------   读文件
           |  |
           |  |---[dll]------   写文件
           |  |
           |  |---[dll]------   关闭句柄
           |  |
           |  |---[dll]------   结束进程
           |  |
           |  |---[dll]------   打开进程句柄

调用的DLL命令:

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

.DLL命令 获取启动信息_, 整数型, "kernel32", "GetStartupInfoA"
    .参数 启动信息, 启动信息, 传址

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

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

.DLL命令 写文件, 整数型, , "WriteFile"
    .参数 文件号, 整数型
    .参数 写入内容, 字节集, 传址
    .参数 写入尺寸, 整数型
    .参数 实际尺寸, 整数型, 传址
    .参数 参数, 整数型

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

.DLL命令 结束进程, 逻辑型, , "TerminateProcess"
    .参数 指定进程, 整数型
    .参数 退出标记, 整数型

.DLL命令 打开进程句柄, 整数型, , "OpenProcess"
    .参数 访问方法, 整数型
    .参数 子程序继承, 逻辑型, , 是否由子程序继承
    .参数 进程标识符, 整数型