For in For dann Goto

[WM_CLOSE]

Und warum nicht so:

Delphi-Quellcode:

var
  boBreak:Boolean;
begin
  for a := 0 to 10 do
  begin
    for b := 0 to 20 do
    begin
      ...
      if ... then
      begin
        boBreak:=True;
        Break;
      end;
    end;
    if boBreak then
      break;
    if ... then Break;
  end; 
end;

?