很基础的问题:如何退出for循环?

Question

for i:=0 to 255 do begin
xxx
yyy
if ...>.... then exit;//退的太远了
end;

Answer 1

先搜索，等别人给结果，早就自己找到了。exit-->break

Answer 2

示例：
var  S: string;
begin
  while True do
  begin
    ReadLn(S);
    try
      if S = '' then Break;
      WriteLn(S);
    finally
    { do something for all cases }
    end;
  end;
end;

Answer 3

for i:=0 to 255 do begin
xxx
yyy
if ...>.... then Break;
end;

Answer 4

用break或continue,break用于退出整个循环过程，continue用于退出当前循环.

Answer 5

dephi中的items里create Thread object产生的unit2中无法使用诸如intToStr(n)这样的函数亦无法使用form里的元素!

Answer 6

有很多控件都含有items属性，不说清楚问题，怎么帮你解决？

Answer 7

系甘架:
File->New->Other...->新建Thread Object对象而产生的unit2
不是控件的items对象

Answer 8

那可能是因为你没在创建的Thread Object对象USES一些必须的单元。