一个线程控制另外一个线程
一个线程控制另外一个线程，如何实现？我用TThread,想在一个线程中写入代码，来暂停另外一个线程，应该怎么写呢？ dephi的不懂,不过api的话SuspendThread暂停
ResumeThread恢复
具体使用 百度 嘛 我想知道怎么是线程交替使用？比如
procedure TForm1.Timer1Timer(Sender: TObject);
begin
//执行代码
Timer2.Enabled:=true;
sleep(3000);
Timer1.Enabled:=flase;
end;
procedure TForm1.Timer2Timer(Sender: TObject);
begin
//执行代码
Timer3.Enabled:=true;
sleep(3000);
Timer2.Enabled:=flase;
end;
上述过程，多线程怎么实现呢？ 别没写，就被TT绕昏了。
CreateThread里面不是有参数？指定线程入口。
在线程入口里，再CreateThread
2个线程怎么控制呢
要不用2个变量控制他们交替执行你的代码
要不用waitforsingleobject，设置信号来执行你的代码
呵呵，delphi这家伙，我写过一个程序，用了36个定时器，结果就一条线程，虽然系统按线程分配cpu资源过来的，不过程序也就900kb，执行所有的定时器，也耗费不来多久，一般来说，多线程对辅助影响不大。
ASM才是王道，delphi是越搞事越多，搞木马病毒挂，还是用vc编译器，尽量用汇编去写代码，否则安全性大打折扣，花样越多，被爆菊花的可能性越高，又称‘暴晒’，我一般写好代码
页:
[1]