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 一次

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