//For循环
{
Pascal 中的for循环严格地建立在计数器基础上,
循环每执行一次,计数器不是增加一个值就是减小一个值。
注意:用 Break 和 Continue 系统过程可以改变循环执行的标准流程。
Break中断循环;
Continue直接跳至循环测试句,
或使计数器增加一个步长,
然后继续循环(除非条件为空或计数器达到最大值)。
还有两个系统过程 Exit 和 Halt,
让你立即从函数或过程中返回,或者终止程序。
}
{
for i := low to high do
begin
...
end;
}
procedure TForm1.Button1Click(Sender: TObject);
var
I: Integer;
begin
for I := 1 to 100 do
begin
memo1.Lines.Add(inttostr(i));
end;
end;