Einzelnen Beitrag anzeigen

Redrah

Registriert seit: 22. Nov 2006
3 Beiträge
 
#1

Abruptes Beenden einer Schleife

  Alt 22. Nov 2006, 21:21
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
  Mit Zitat antworten Zitat