Break in Lazarus wird verweigert?

[AlexII]

Ich habe eine ganz einfach Abfrage:

Delphi-Quellcode:

if not a.Checked and not b.Checked and not c.Checked
and not d.Checked and not e.Checked and not f.Checked then
begin
  ShowMessage('Bitte eine Option auswählen!');
  Break;
end;

Aber Lazarus verweigert mir ein Break mit der Meldung "Error: BREAK not allowed" zu setzen. Wieso eigentlich? Mit Delphi geht das ohne Probleme, ch klick in der Meldung auf OK, wähle eine Option und mache weiter.
Danke!