Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Abruptes Beenden einer Schleife (https://www.delphipraxis.net/81220-abruptes-beenden-einer-schleife.html)

Redrah 22. Nov 2006 20:21


Abruptes Beenden einer Schleife
 
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

Balu der Bär 22. Nov 2006 20:22

Re: Abruptes Beenden einer Schleife
 
Delphi-Referenz durchsuchenBreak ? :gruebel:

Redrah 22. Nov 2006 20:26

Re: Abruptes Beenden einer Schleife
 
Vielen Dank für deine Hilfe!

EDatabaseError 22. Nov 2006 20:28

Re: Abruptes Beenden einer Schleife
 
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;
            break;
           // 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;
;-)

mkinzler 22. Nov 2006 20:28

Re: Abruptes Beenden einer Schleife
 
Zitat:

Zitat von Redrah
Also einfach anstatt meines Komentares ein break setzen oder muss ich noch was hinzufügen?

Was sagt deine Hilfe dazu? Ja.

Sunlight7 22. Nov 2006 20:30

Re: Abruptes Beenden einer Schleife
 
Zitat:

Zitat von Redrah
Also einfach anstatt meines Komentares ein break setzen oder muss ich noch was hinzufügen?

->;<- Das :mrgreen:


PS: Herzlich Willkommen in der DP! :dp:

jakobwenzel 22. Nov 2006 20:32

Re: Abruptes Beenden einer Schleife
 
Nein, vor einem end braucht man kein ; :mrgreen:

Redrah 22. Nov 2006 20:38

Re: Abruptes Beenden einer Schleife
 
Danke für die nette Begrüßung und die nette Hilfe!
Da kann ich nur zustimmen :dp:

Sunlight7 22. Nov 2006 20:41

Re: Abruptes Beenden einer Schleife
 
Zitat:

Zitat von jakobwenzel
Nein, vor einem end braucht man kein ; :mrgreen:

Kann man aber :wink:

Flare 22. Nov 2006 21:46

Re: Abruptes Beenden einer Schleife
 
Zitat:

Zitat von Sunlight7
Zitat:

Zitat von jakobwenzel
Nein, vor einem end braucht man kein ; :mrgreen:

Kann man aber :wink:

Und ich würde es auch setzen, denn ich finde das eindeutig übersichtlicher und man kann nicht behaupten, dass das Projekt dadurch langsamer compiliert wird :lol:


Flare


Alle Zeitangaben in WEZ +1. Es ist jetzt 19:15 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz