Y yostgxf Unregistered / Unconfirmed GUEST, unregistred user! 2004-04-19 #22 代码没什么特别的，只是在一个线程中运行。用控制线程挂起和Resume的方法来控制暂停和继续。 怎么使用线程的话，你可以查一下书，或delphi自带的例子，不难的。
H hug Unregistered / Unconfirmed GUEST, unregistred user! 2004-04-19 #23 在这里不给yostgxf分了，去哪里拿分好了！还有谁去？哪里100分 目前只有两个人
扶 扶程星云 Unregistered / Unconfirmed GUEST, unregistred user! 2004-04-19 #24 to 扶程星云: 您说得很对，先暂停跳出循环后，在点击“继续”按钮时将Count 传入 循环，向您所说的for index:=counter do High(A) do 但不值怎么实现？谢谢 我有说这句吗？没有吧？ 建议你单步执行并监视相关值，看到什么情况你的值传进来了，什么情况你的值没有传进来，从程序上看，大家的没什么问题。
to 扶程星云: 您说得很对，先暂停跳出循环后，在点击“继续”按钮时将Count 传入 循环，向您所说的for index:=counter do High(A) do 但不值怎么实现？谢谢 我有说这句吗？没有吧？ 建议你单步执行并监视相关值，看到什么情况你的值传进来了，什么情况你的值没有传进来，从程序上看，大家的没什么问题。
