当在程序中运行DOS命令时如何隐藏DOS窗口并判断其结束

问：我想在程序中运行有关DOS命令，可又不想让用户看到DOS窗口，并想判断一下DOS命令是否已运行结束，难死我了？
答：你的要求也太高了，这样试试吧：

第一步：定义全局外部函数：

Function long ShellExecuteA (long hwnd, string lpOperation ,String lpFile, String lpParameters, String lpDirectory, Long nShowCmd) Library "shell32.dll"

Function long FindWindowA (String lpClassName , String lpWindowName ) Library "user32.dll"

Function boolean IsWindow (Long hwnd ) Library "user32.dll"

[用API函数，可以隐藏应用程序的窗口，但是调用bat批处理命令时需要先建立一个PIF(批处理命令的快捷键方式)文件指定执行完成后关闭窗口(其中的一个属性)，否则窗口不会自行关闭。]

第二步：在窗口上建立按扭，clicked事件中包含如下Script:

ulong ll_handle,lu_return

string ls_path

SetPointer(HourGlass!) //设置鼠标指针
//运行DOS批处理命令的快捷键方式，并将其窗口隐藏
lu_return = ShellExecutea(handle(parent), "open", "xxx.pif", "", ls_path, 0)
//最后一个参数改为 4，可以显示执行情况，0为隐藏窗口
if lu_return>32 then
ll_handle = 0
//循环至DOS窗口打开
Do While ll_handle = 0
ll_handle = FindWindowA("tty","xxx")
yield()
loop
//等待DOS窗口关闭
Do While isWindow(ll_handle)
Yield()
Loop
//应用执行完成
MessageBox("提示信息", "运行完毕!")
end if