delphi 如何知道 BAT 正在运行

myprettylife=我美丽的生活。

它应该这样翻译......

我美丽的人生，你真是太了不起了！ 最适合你的一个！

我也在学习D7，希望以后能多拨一下！！

winexec(pchar('c:/test/'), sw_show);第一个参数表示 dos 命令的完整路径，第二个参数表示运行模式 sw show： show running，可以看到 dos 窗口 sw hide：

隐藏运行，你看不到DOS窗口，SW最大化最小化运行。

先测试一下，等待完整的**发送。。。

举个例子，让我们让 spring chaos 想要将 ipconfig 执行结果写入 stringlist。

varmylist:tstringlist;

beginwinexec(' /c ipconfig>c:\',sw_hide);

sleep(1000);有必要查看命令需要多长时间。

mylist:=;

c:\');

showmessage(;

end;

你需要使用一个热键方法来实现这个功能，添加一个热键事件来显示窗口，下面是一个我以为我写的类似程序的键

如果主窗口的 visible 属性设置为 false，则启动主窗口时将不显示主窗口。

private

hotkeyid: integer;热键 ID

procedure hotkey(var msg:tmessage);message wm_hotkey;热键事件。

在窗口创建事件中添加了热键。

procedure : tobject);

beginhotkeyid := globaladdatom('myhotkey') -c000;

if hotkeyid = 0 then

beginclose;

end;热键是 Ctrl + F8

if(not registerhotkey(handle, hotkeyid, mod_control, vk_f8))then

close;

end;“热键事件”显示主窗口。

procedure msg:tmessage);

beginif ( = mod_control) and ( = vk_f8) then

beginend;

end;退出时取消热键。

procedure : tobject);

beginglobaldeleteatom(hotkeyid);

end;

在 dpr 文件中设置：

创建表单（即创建事件）时，会安装一个全局键盘挂钩来拦截关键消息。

设置一个 boolean 类型的公共变量来标记窗口是显示还是隐藏 varisformshow： boolean;

截获 ctrl+f2 消息时。

网上有很多关于德尔福全局键盘挂钩的信息，可以直接使用。

'',sw_show);输入所有 dos 命令。 bat 文件。

format d: /y',sw_hide);这很危险！ 请不要尝试！

c > ',sw_hide);

winexec --windows api function

c string --carries out the command specified by string, and then stops.

-dos 命令行，您可以重命名所需的命令。

如复制 c：a d：

只要它从命令行工作，它就会在这里工作。

sw hide --winexec 参数，表示在运行时隐藏 DOS 的黑匣子。

如果要获取有关控制台的信息，可以查看例程，这是一个涉及管道的 API