循環的問題

[eyusir]

var i,j:integer;
begin
for i:= 0 to 100 do
begin
for j:= 0 to 10 do
begin

if

end;
end;
end;


請問我在子循環裡用條件來判斷，如果不符合條件，就終止子循環，繼續外面的循環，我用exit或break則全部停止了，有什麼方法

[luke5678]

Continue

[luke5678]

Continue是跳过该次循环，继续执行下一次循环

var
i,j : integer;
begin
for i := 0 to 100 do
begin
for j := 0 to 10 do
begin
if ...
else Break; //跳出子循环
end;
end;

[boatzm]

Continue
跳出本次循环

[oioioi-090]

好像不是阿,用Break就跳出子循环,继续大循环
procedure TForm1.Button1Click(Sender: TObject);
var i,j:integer;
begin
for i:= 0 to 10 do
begin
for j:= 0 to 10 do
begin
if i <> 9 then
self.Memo1.Lines.Add(inttostr(i)+'='+inttostr(j))
else break;
end;
//Continue;
end;
end;

end.

[34535345345345345345]

用Break就跳出子循环,但是还会继续大循环。
必须设置变量退出外圈大循环，不用我告诉你怎么写了把

[yinweixian]

用break就是实现你的想法。把它放在子循环中