If Anweisung mit 2 Bedingungen?

[Hallo_Thomas]

Eine Frage, wie Packe ich 2 Bedingungen in eine Schleife?

Ich habs so probiert und noch ein zwei andere Versuche abdie sind schief gegangen

Delphi-Quellcode:

if VorFeld[60] div 2+Feld[98]<=Maxi2;
 VorFeld[60] div 2+Feld[110]<=Maxi2 Then....

Hier möchte ich einfach wenn diese 2 Bedingungen erfüllt sind soll dies ausgeführt werden.

[Kidix]

and und oder or sind deine Freunde!

Kidix

[TheAn00bis]

Zitat:

Zitat von Hallo_Thomas

Eine Frage, wie Packe ich 2 Bedingungen in eine Schleife?

Ich habs so probiert und noch ein zwei andere Versuche abdie sind schief gegangen

Delphi-Quellcode:

if VorFeld[60] div 2+Feld[98]<=Maxi2;
            VorFeld[60] div 2+Feld[110]<=Maxi2 Then....

Hier möchte ich einfach wenn diese 2 Bedingungen erfüllt sind soll dies ausgeführt werden.

Delphi-Quellcode:

if (VorFeld[60] div 2+Feld[98]<=Maxi2) and
            (VorFeld[60] div 2+Feld[110]<=Maxi2) Then....

[Sharky]

Hai Hallo_Thomas,

Du musst in diesem Fall deine beiden Bedinugung mit einem AND verknüpfen.

Delphi-Quellcode:

if (VorFeld[60] div 2+Feld[98] < =Maxi2) AND
            (VorFeld[60] div 2+Feld[110] <= Maxi2) Then....

[rantanplan99]

Zitat:

Zitat von Hallo_Thomas

Eine Frage, wie Packe ich 2 Bedingungen in eine Schleife?
Ich habs so probiert und noch ein zwei andere Versuche abdie sind schief gegangen

Delphi-Quellcode:

if VorFeld[60] div 2+Feld[98]<=Maxi2;
            VorFeld[60] div 2+Feld[110]<=Maxi2 Then....

Hier möchte ich einfach wenn diese 2 Bedingungen erfüllt sind soll dies ausgeführt werden.

Mit logischen Verknüpfungen ist das machbar.

Delphi-Quellcode:

if Bedinung1 AND Bedinung2 then ...

Wenn beide zu treffen müssen

Delphi-Quellcode:

if Bedinung1 OR Bedinung2 then ...

Wenn nur eine der beiden zutreffen muss ..

und in deinem Fall brauchst du AND

Delphi-Quellcode:

if (VorFeld[60] div 2+Feld[98]<=Maxi2) and (VorFeld[60] div 2+Feld[110]<=Maxi2) Then....

rantanplan

[malo]

Mit if kann man keine Schleifen, sondern nur Abfragen machen ;)

Delphi-Quellcode:

if (VorFeld[60] div 2+Feld[98]<=Maxi2) and (VorFeld[60] div 2+Feld[110]<=Maxi2) Then....

Oder so:

Delphi-Quellcode:

if VorFeld[60] div 2+Feld[98]<=Maxi2 then
  if VorFeld[60] div 2+Feld[110]<=Maxi2 then...

Ersteres ist zwar imho schöner, aber manchmal kommt man um die zweite Methode nicht umher ;)

[Hallo_Thomas]

Dankeschön, das hat echt weitergeholfen

[hardy1234]

Warum nicht mit while, wenn es schon ne Schleife sein soll? Etwa so:

Delphi-Quellcode:

  .
  while Expression1 and Expression2 do begin
    .
  end; // of while Expression1 and Expression2 do begin
  .

Ein besonders hübscher Trick besteht bei mehreren Bedingungen darin, ein Zuweisung zu einem boolean zu benutzen. Erleichter die Übersicht wenn das ein Haufen Zeugs wird. Etwa so:

Delphi-Quellcode:

var
  Exp1,
  Exp2 : boolean;
begin
  Exp1:= (VorFeld[60] div (2 + Feld[98])) <= Maxi2 ; // Ergebnis ist boolscher Wert
  Exp2:= ...;
  {*** und nun los ***}
  while Exp1 and Exp2 do begin

  end; // of while Exp1 and Exp2 do begin
end;

Sieht im Code auch etwas hübscher aus oder nicht?

[malo]

@hardy1234: Wegen den Schleifen: Es waren bestimmt die if-Abfragen gemeint ;)
Bei der ersten Variante fehlen jedoch die Klammern.


Die zweite Variante halte ich (besonders für Anfänger) viel zu kompliziert.

Was mich bei Schleifen in diesem Fall stört: Der Code wird IMMER WIEDER ausgeführt. Deshalb sind es auch Schleifen. Man müsste künstlich die Bedingung unterbrechen oder ein Break einbauen, was nicht so schön ist.

[Palando]

Zitat:

Zitat von rantanplan99

Mit logischen Verknüpfungen ist das machbar.
.. AND ..
.. OR ..

Gibt es eigentlich auch ein XOR? Weil einfach "XOR" ging bei mir glaube ich nicht...


(XOR = die Schleife wird nur ausgeführt, wenn die eine Bedingung true und die andere false ist. Wenn beide true sind, oder beide false, dann wirds nicht gemacht.)