进程_创建 卡UI BUG

379061296

官方的精易模块，进程创建，会卡UI，如果创建的进程链接网络不上，就会一直卡住，照下面这个更新一下

进程_创建.e (676.95 KB, 下载次数: 4)

2018-3-3 20:50 上传

点击文件名下载附件
下载积分: 精币 -2 枚

  

子程序名	返回值类型	公开	备 注
进程_创建	整数型		创建一个程序进程(成功返回进程ID,失败返回0)
参数名	类 型	参考	可空	数组	备 注
程序路径	文本型				欲创建进程的执行路径
命令行	文本型				附加上程序路径后的命令行参数
是否等待	逻辑型				是否等待程序运行完毕,默认为假.
显示方式	整数型				被运行程序窗口显示方式.参数值可以为以下常量之一:1 #隐藏窗口 2 #普通激活 3 #最小化激活 4 #最大化激活 5 #普通不激活 6 #最小化不激活.如果省略本参数,默认为“普通激活”方式.
运行目录	文本型				通常留空,特殊情况下使用
进程结构	精易_进程结构				接收进程结构信息的变量,如果不为空，产品的句柄用CloseHandle函数释放

变量名	类 型	静态	数组	备 注
窗口结构	StartupInfo

如果真 (运行目录 ＝ “”)
运行目录 ＝ 取文本左边 (程序路径, 倒找文本 (程序路径, “\”, , 假))
窗口结构.cbSize ＝ 68
判断 (显示方式 ＝ 1)
窗口结构.dwFlags ＝ 1
窗口结构.wShowWindow ＝ 0
判断 (显示方式 ＝ 3)
窗口结构.dwFlags ＝ 1
窗口结构.wShowWindow ＝ 2
判断 (显示方式 ＝ 4)
窗口结构.dwFlags ＝ 1
窗口结构.wShowWindow ＝ 3
判断 (显示方式 ＝ 5)
窗口结构.dwFlags ＝ 1
窗口结构.wShowWindow ＝ 4
判断 (显示方式 ＝ 6)
窗口结构.dwFlags ＝ 1
窗口结构.wShowWindow ＝ 6
窗口结构.dwFlags ＝ 0
窗口结构.wShowWindow ＝ 1
CreateProcessA (程序路径, 命令行, 0, 0, 0, 0, 0, 运行目录, 窗口结构, 进程结构)
如果 (是否等待)
WaitForSingleObject (进程结构.进程句柄, -1)
WaitForInputIdle (进程结构.进程句柄, 1000)
如果真 (是否为空 (进程结构))
CloseHandle (进程结构.进程句柄)
CloseHandle (进程结构.线程句柄)
返回 (进程结构.进程标识符)

.版本 2<br /> <br /> .子程序 进程_创建, 整数型, 公开, 创建一个程序进程(成功返回进程ID,失败返回0)<br /> .参数 程序路径, 文本型, , 欲创建进程的执行路径<br /> .参数 命令行, 文本型, 可空, 附加上程序路径后的命令行参数<br /> .参数 是否等待, 逻辑型, 可空, 是否等待程序运行完毕,默认为假.<br /> .参数 显示方式, 整数型, 可空, 被运行程序窗口显示方式.参数值可以为以下常量之一:1 #隐藏窗口 2 #普通激活 3 #最小化激活 4 #最大化激活 5 #普通不激活 6 #最小化不激活.如果省略本参数,默认为“普通激活”方式.<br /> .参数 运行目录, 文本型, 可空, 通常留空,特殊情况下使用<br /> .参数 进程结构, 精易_进程结构, 参考 可空, 接收进程结构信息的变量,如果不为空，产品的句柄用CloseHandle函数释放<br /> .局部变量 窗口结构, StartupInfo<br /> <br /> .如果真 (运行目录 ＝ “”)<br />     运行目录 ＝ 取文本左边 (程序路径, 倒找文本 (程序路径, “\”, , 假))<br /> .如果真结束<br /> 窗口结构.cbSize ＝ 68<br /> .判断开始 (显示方式 ＝ 1)<br />     窗口结构.dwFlags ＝ 1<br />     窗口结构.wShowWindow ＝ 0<br /> .判断 (显示方式 ＝ 3)<br />     窗口结构.dwFlags ＝ 1<br />     窗口结构.wShowWindow ＝ 2<br /> .判断 (显示方式 ＝ 4)<br />     窗口结构.dwFlags ＝ 1<br />     窗口结构.wShowWindow ＝ 3<br /> .判断 (显示方式 ＝ 5)<br />     窗口结构.dwFlags ＝ 1<br />     窗口结构.wShowWindow ＝ 4<br /> .判断 (显示方式 ＝ 6)<br />     窗口结构.dwFlags ＝ 1<br />     窗口结构.wShowWindow ＝ 6<br /> .默认<br />     窗口结构.dwFlags ＝ 0<br />     窗口结构.wShowWindow ＝ 1<br /> .判断结束<br /> CreateProcessA (程序路径, 命令行, 0, 0, 0, 0, 0, 运行目录, 窗口结构, 进程结构)<br /> .如果 (是否等待)<br />     WaitForSingleObject (进程结构.进程句柄, -1)<br /> .否则<br />     WaitForInputIdle (进程结构.进程句柄, 1000)<br /> .如果结束<br /> .如果真 (是否为空 (进程结构))<br />     CloseHandle (进程结构.进程句柄)<br />     CloseHandle (进程结构.线程句柄)<br /> .如果真结束<br /> 返回 (进程结构.进程标识符)

  

DLL命令名	返回值类型	公开	备 注
WaitForInputIdle	整数型		监测进程空闲
DLL库文件名:
user32
在DLL库中对应命令名:
WaitForInputIdle
参数名	类 型	传址	数组	备 注
hProcess	整数型
dwMilliseconds	整数型

.版本 2<br /> <br /> .DLL命令 WaitForInputIdle, 整数型, "user32", "WaitForInputIdle", , 监测进程空闲<br />     .参数 hProcess, 整数型<br />     .参数 dwMilliseconds, 整数型