Delphi的高手请进?????

Question

1、你把执行的子程序的Handle都FindWindow出来，记录到一个地方
2、在退出的时候，遍历上述存储的Handle, 一一DestoryWindow

Answer 1

在主程序的关闭事件中用API： FindWindow或FindWindowEx找到子程序的窗体，然后向窗体发送关闭的消息

Answer 2

使用CreateProcess来进行控制了具体看Win Api

Answer 3

用一个List来管理你的子程序即可。

Answer 4

请问我已经试了 DestoryWindow , shellExecute Api 都不起作用？？
注意：是关闭一个独立的 Exe 应用程序.

Answer 5

同意manboo的意见，用createprocess关闭用sendMessage(wnd, WM_CLOSE, 0, 0);  Hand := CreateToolhelp32Snapshot(TH32CS_SNAPALL,0);
  found := Process32First(Hand,lppe);
  while found do
  begin
    memo1.Lines.Add(StrPas(lppe.szExeFile));
    found := Process32Next(Hand,lppe);
  end;