break , continue , exit 的区别

1. break

 跳出当前循环体

 

2. continue

 从此位置直接跳出当前循环（次）代码，跳至循环开始处继续执行循环

 

3. exit

 退出当前模块（过程、函数）

 

EG：

1. break

function GetI: Integer;
begin
  Result := StrToInt(Form1.Edit1.text);
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  i: Integer;
begin
  while i <> 10 do
  begin
    Memo1.Lines.Add('while do 一次');

    i := GetI;
    if i = 1 then
      Break;  //
    Memo1.LineS.Add('我在break后');
    Application.ProcessMessages;
  end;
  Memo1.Lines.Add('stop')
end;

执行结果：

-----Edit值为0时------

我在break后
while do 一次
我在break后
while do 一次
我在break后
while do 一次
我在break后
while do 一次
我在break后
while do 一次
我在break后
while do 一次
我在break后
while do 一次
我在break后
while do 一次
我在break后
while do 一次
我在break后
while do 一次
我在break后
while do 一次
我在break后

-----Edit值为1时------
while do 一次
stop

---------------------------

 

 

2. continue.

function GetI: Integer;
begin
  Result := StrToInt(Form1.Edit1.text);
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  i: Integer;
begin
  while i <> 10 do
  begin
    Memo1.Lines.Add('while do 一次');
    i := GetI;
    if i = 1 then
      Continue;
    Memo1.LineS.Add('我在break后');
    Application.ProcessMessages;
  end;
  Memo1.Lines.Add('stop')
end;

执行结果：

-----Edit值为0时------

我在break后
while do 一次
我在break后
while do 一次
我在break后
while do 一次
我在break后
while do 一次
我在break后
while do 一次
我在break后
while do 一次
我在break后
while do 一次
我在break后
while do 一次
我在break后
while do 一次
我在break后
while do 一次
我在break后
while do 一次
我在break后

-----Edit值为1时------
while do 一次
while do 一次
while do 一次
while do 一次
while do 一次
while do 一次
...

while do 一次

---------------------------

 

3. Exit

 

function GetI: Integer;
begin
  Result := StrToInt(Form1.Edit1.text);
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  i: Integer;
begin
  while i <> 10 do
  begin
    Memo1.Lines.Add('while do 一次');
    i := GetI;
    if i = 1 then
      Exit;
    Memo1.LineS.Add('我在break后');
    Application.ProcessMessages;
  end;
  Memo1.Lines.Add('stop')
end;

 

-----Edit值为0时------

while do 一次
我在break后
while do 一次
我在break后
while do 一次
我在break后
while do 一次
我在break后
while do 一次
我在break后
while do 一次
我在break后
while do 一次
我在break后
while do 一次
我在break后
while do 一次
我在break后
while do 一次
我在break后
while do 一次
我在break后
while do 一次
我在break后

-----Edit值为1时------
while do 一次

---------------------------