我的另外一个进程在执行循环查询,如何终止呢?叫他停止而不是整个程序退出!谢谢!

解决方案 »

  1.   

    用sendmessage发送一个消息给他,消息名忘了。查msdn吧。
      

  2.   

    if (AThread <> nil) and (not AThread.terminated) then
    begin
      AThread.Suspend;
      AThread.Terminate;
      AThread.free;
    end;
    或者这样:
    AThread.FreeonTerminate:=false;  //关闭自动释放
    AThread.Terminate;               //终止线程
    if AThread.WaitFor=WAIT_OBJECT_0 then    //等待线程Terminate后释放
      AThread.free
    else ....