Question

Delphi 算法请教, 如何判断一个循环是否停止?

我的办法是在这个循环中设定一个变量, 每次进入这个循环, 变量就加1.

然后用另外一个循环来检查这个变量, 如果连续几次都是一样的没有变化, 就可以判定为循环1已经停止.

但是具体用算法不知道怎么来实现, 有高手指点一下吗

补充: 判断循环是否停止, 是为了让这个循环能够在停止的时候再次让他循环起来...

Answer 1

觉得应该是这样做：
1、首先你的界面应该有开始、继续、停止功能。
2、设计如此的循环最好用线程功能，不然一循环起来，界面的按钮你点击了也不响应，建议用TIMER就可以。
3、do while not flat1<>true
begin
ii:=ii+1;
........
end;
4、ii,FLAT1应该是全局变量,变量值开始按钮时应该是 ii:=1,flat1=false;
5、点继续按钮，应该保存II值，要重新运行，就再新把这个赋给II值就可以。

Answer 2

想一直循环就用while好了，判断条件设为True就行。

Answer 3

什么意思啊？循环结束自己就跳出了，干嘛要判断？

回答补充：还是不太明白你想干什么。如果你让他循环停止之后再循环，干嘛要让循环停止呢。我觉得你是不是想让他循环执行一组数据啊。如果是这样的话，比如for i:=0 to 5 do。在循环末尾加if i>5 then i:=0就可以继续循环了。但这时就是死循环了，跳出你就要另加判断是否该跳出了，用goto或exit看情况用哪一个跳出就行

Answer 4

设一个Boolean型变量, 进入循环前设为TRUE, 循环结束后设为FALSE, 检查这个变量即知是否结束!

Answer 5

goto语句，如果你可以尝试的话
而且必须也要goto语句来实现你的功能
label:^^^^^^^^