delphi線程的建立、掛起、激活與終止

procedure TForm1.Button1Click(Sender: TObject); begin //建立線程，同時線程函數被調用 hthread:=CreateThread(nil,0,@MyThreadfunc,nil,0,ThreadID); end; procedure TForm1.Button2Click(Sender: TObject); begin SuspendThre

>>阅读原文<<