TThread.resume 跟 suspend 不建议使用，那用什么
TThread.resume 和 suspend 不建议使用，那用什么？
不记得从哪个版本开始，TThread.resume 和 suspend 被不建议使用了。
若硬要用IDE会显示[dcc32 Warning] Symbol 'Resume' is deprecated。
网上查了一下，建议改用 Start 和 terminate 代替。
问题是它们的语意并不完全相通、相替。
因为我要的是“暂停”、“继续”，而不是“开始”。
我反复测试，发现若 create(suspend=true) 时（且FreeOnTerminated=false)，start 是可用的，
但若是等Thread执行完Execute内全部代码后，再执行一次start就出错，
错误信息是：“当thread是suspend或terminated时，不能使用start”。
我的目的是要，thread被建立后，execute内的代码可以被反复使用，不用时，暂停。
目前我的做法如下：
procedure TMyThread.execute;
begin
while not terminated do
begin
.................................
suspend;
end;
end;
然后Create(false)且（且FreeOnTerminated=True)；
如此，每次我需要它执行时，就调用 FThread.resume;
这么写，结果是我要的。
唯一讨厌的是，每次compile总会给我resume不建议使用，这样的错误信息。
请问各位，针对我的要求，如何改用thread.start来完成？
谢谢！
------解决方案--------------------
访问和设置 Suspended 属性
不记得从哪个版本开始，TThread.resume 和 suspend 被不建议使用了。
若硬要用IDE会显示[dcc32 Warning] Symbol 'Resume' is deprecated。
网上查了一下，建议改用 Start 和 terminate 代替。
问题是它们的语意并不完全相通、相替。
因为我要的是“暂停”、“继续”，而不是“开始”。
我反复测试，发现若 create(suspend=true) 时（且FreeOnTerminated=false)，start 是可用的，
但若是等Thread执行完Execute内全部代码后，再执行一次start就出错，
错误信息是：“当thread是suspend或terminated时，不能使用start”。
我的目的是要，thread被建立后，execute内的代码可以被反复使用，不用时，暂停。
目前我的做法如下：
procedure TMyThread.execute;
begin
while not terminated do
begin
.................................
suspend;
end;
end;
然后Create(false)且（且FreeOnTerminated=True)；
如此，每次我需要它执行时，就调用 FThread.resume;
这么写，结果是我要的。
唯一讨厌的是，每次compile总会给我resume不建议使用，这样的错误信息。
请问各位，针对我的要求，如何改用thread.start来完成？
谢谢！
------解决方案--------------------
访问和设置 Suspended 属性