如何向打开的指定Dos窗口发送Ctrl+C信息?

在windows下写Delphi程序调用Dos命令后, 出现Dos窗口, 但程序运行完后不自动关闭, 请问问题1: Windows中是如何设置Dos程序的属性-->退出时关闭 这个属性的?问题2: 现在有一个Dos命令执行完后, 却要我按Ctrl+C才能关闭,请问如何 向该Dos窗口发送Ctrl+c信息, 使之关闭, 不用人的参与?解决办法1: 用程序实现运行自动设置Dos程序属性->退出时关闭属性解决办法2: 向该Dos窗口发送Ctrl+C作为Console输入, 以下为发送 Ctrl+C程序, 但没用, 请问该如何解决?var DosHdl: THandle; Times: Cardinal; KeyEvent1: TKeyEventRecord; Key: TInputRecord;begin KeyEvent1.bKeyDown := True; KeyEvent1.wRepeatCount := 1; KeyEvent1.wVirtualKeyCode := Ord('C'); KeyEvent1.AsciiChar := 'C'; KeyEvent1.wVirtualScanCode := Ord('C'); KeyEvent1.dwControlKeyState := LEFT_CTRL_PRESSED; Key.EventType := 0; Key.Event.KeyEvent := KeyEvent1; DosHdl := FindWindow('tty', 'a'); //可以找到该Dos窗口 if DosHdl <> 0 then begin Times := 1; WriteConsoleInput(DosHdl, Key, 10, Times); end;end; 查看更多答案>>