Beenden meines Delphi Programms während einer For Schleife

[Hepheisto]

Code:

procedure TPokersupporter.start_btnClick(Sender: TObject);
var uebergang: string;
begin
  start_btn.Caption := '&Neustart';
  ende_test := true;
  .....
 for t := 1 to 20 do
  if ende = false then
   begin
    if sound = true then
    begin
     PlaySound(PChar('ARNOLD'), hInstance, snd_ASync or snd_Resource);
      Pause(2000);
        begin
           if ende = false then
             begin
              //HIER KOMMT JETZT DAS ZÄHLEN DER BLINDS
              ....
              //DAS ZÄHLEN DER BLINDS BEENDET
             end;                                  
        end;                                         
    end;                                             
   end;

so nur weiß ich nicht wie ich das break dort einbauen soll?

habe ich das richtig verstanden dass break ene boolsche variable ist?