先获取要关闭程序的句柄,然后调用API(具体是什么,忘了)

解决方案 »

  1.   

    好像是用FindWindow来查找一个窗体, 用CloseWindow或发送一个WM_CLOSE消息来
    关闭一个窗体
    function FindWindow(ClassName: pchar; WindowName: pchar): hWnd;
    function CloseWindow(wnd: hWnd): boolean;
      

  2.   

    想起来了, 最好用PostQuitMessage, (发送WM_QUIT),这样干净利落, :)
    依次使用下列WinAPI
    CreateToolhelp32Snapshot
    Process32First
    Process32Next
    可以得到
    PROCESSENTRY32结构
    从中找到您关心的ThreadHandle, or ProcessHandle
    Then:
    使用
    CloseHandle
    杀人不眨眼!, :)
    )
      

  3.   

    zzllabc(龙)能给点代码,我很急,下午就得交活!怎样找到我关心的ProcessHandle?
      

  4.   

    var
      FindHWND:HWnd;
    begin
       FindHWND:=FindWindow(nil,'窗体名称');
       if FindHWND<>0 then
          SendMessage(FindHWND,WM_CLOSE,0,0);
    end;
      是不是你要的???
      

  5.   

    不是,我要关闭的EXE文件没有窗体