//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;