application.terminate
application.run

解决方案 »

  1.   

    getexitcode...
    killprocess or killthread...
      

  2.   

    FMyThread := TMyThread.Create(True);            //启动第一个线程
    FMyThread.FreeOnTerminate := True;
    FMyThread.Resume;
    这是我定义的一个线程, 怎样中止它呢
      

  3.   

    当线程执行完就Free了。
    要想结束线程,可以用TThread.Terminate;
    但是TThread.Terminate只是把TThread.Terminated赋为true,所以必须在Execute函数里加上检测Terminated的语句。
    还有个办法强制结束线程——API函数TerminateThread,但是资源释放不了,最好别用。