如何在delphi里结束外部程序？

Question

我用winexec 调用IE，但是不知道如何结束它，帮助文档里没有winexec的相关帮助。有人指点一下吗

Answer 1

把下面代码改成H:=FindWindow(IEFrame,0);转贴
杀死进程procedure TForm1.Button1Click(Sender: TObject);
var
  H:THandle;
  P:DWORD;
begin
  H:=FindWindow(nil,'无标题 - 记事本');
  if H<>0 then
  begin
    GetWindowThreadProcessId(H,@P);
    if P<>0 then
      TerminateProcess(OpenProcess(PROCESS_TERMINATE,False,P),$FFFFFFFF);
  end;
end;

Answer 2

应该是
H:=FindWindow('IEFrame',0);