Schleifenproblem

christian_m · Beiträge: 26

Hi Delphi-Community!

Ich möchte mit Hilfe von FindComponents 6 Shapes nach einem bestimmten Wert abfragen.
Die Shapes heißen Shape1, Shape 2 ... Shape 7. Nun möchte ich nicht alle abfragen, sondern nur die ersten zwei und dann das vierte bis zum siebten.

Kann ich das folgendermaßen machen:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:

//Pseudocode 

 for y:= 1 to 2 and for y:= 4 to 7 do
  begin
    {Anweisung1}
    break
  end;

Oder muss ich für jede Schleife die (gleiche) Anweisung neu schreiben?

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:

//Pseudocode
 
 for y:= 1 to 2 do 
  begin
   {Anweisung1}
   break
  end;

  for y:= 4 to 7 do 
   begin
    {Anweisung1}
     break
   end;

Kann mir jemand einen Tipp geben wie das funktioniert?

mfg Chris

Jakob Schöttl · Beiträge: 929 Erhaltene Danke: 1 Delphi 7 Professional

Deine erste Lösung mit dem and kann nicht funktionierten. Du musst dich hald an die richtige Syntax halten!

Also nimm zwei schleifen oder mach es so:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:

for n := 1 to 7 do
begin
  if (n <= 2) or (n >= 4) then
    //Anweisung wird nur bei n = 1,2,4,5,6,7 ausgeführt
  //wieso Break? Break heißt Schleife verlassen.
end;

Gausi · Verfasst: Mo 28.05.07 10:18

afaik gibts bei den neuen Delphi-Versionen auch eine for-Each-Schleife oder so. Da müsste das dann in etwa so gehen for each i in [1,2,4..7] do ... Aber die genaue Syntax kenne ich nicht, da ich meistens mit D7 arbeite, und da gibts das noch nicht ;-)

_________________
We are, we were and will not be.

christian_m · Beiträge: 26

Das ging ja schnell.

Danke für die Antworten !

Edit// PS Ich hab nur Delphi ver 4 :cry:

Gruß Chris

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme