Delphi如何让程序暂停、继续

Question

我想控制一组Panel控件循环，在循环过程中包含暂停、继续功能。该如何实现？
由于小弟初学，希望高手详细说明。多谢！

Answer 1

第一种：用线程控制，可以挂起和唤醒
第二种：写个循环，在循环中加入一个变量，用这个变量来控制循环中是否执行你的代码，还是空转执行
比如
while true do
begin
  if cando = 0 then
    DoYourAction
  else if cando = 1 then
    continue
  else
    break;
end;

Answer 2

啥叫"控件循环"?如果你需要做一个一直工作的效果，最简单用Timer，停止时就把Timer的Enable给false了，恢复时把Timer的Enable给true了。

Answer 3

用timer
循环，
线程都可以吧

Answer 4

自己实践吧：
1、使用Timer控件，通过指定变量，来开关Timer的Enable。
2、使用线程，这也是最好的（容易控制）。
3、通过windows的消息机制。