Abruptes Beenden einer Schleife

[Redrah]

Hey Leutz,
ich habe folgendes Problem:
Ich durchsuche mit Hilfe einer Schleife ein Array. Wenn er einen bestimmen Wert gefunden hat, dann soll er die Schleife abrupt beeenden.
Hier nun noch als Hilfe mein Code.

Delphi-Quellcode:

  For x:= 0 to (AnzahlPunkte - 1) Do
   begin
     If NewxPunkte[Durchlaeufe] = NewxPunkte[x] Then
     begin
        If NewyPunkte[Durchlaeufe] = NewyPunkte[x] Then
           IF Durchlaeufe <> x Then
           begin
            PunktMerker:=true;
           // Hier soll die For-Schleife abrupt beendet werden und in Zeile mit Anzeige[...]:=0; gesprungen werden.
           end;
     end
     Else PunktMerker:=false;
   end;
   Anzeige[NewxPunkte[Durchlaeufe], NewyPunkte[Durchlaeufe]]:= 0;

Vielen Dank für eure Hilfe
Daniel