Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - Mehrere Bedingungen geschachtelt..


Terra23 - Mo 11.08.03 14:14
Titel: Mehrere Bedingungen geschachtelt..
Hi Leutz.

Ich habe mal eine Frage:

Ich habe in meinem Programm für eine Berechnung eine Bedingung geschachtelt..


Delphi-Quelltext
1:
2:
3:
If (YQ='Une'And ((X1='Si1'Or (X1='Si2'))
Then C1:=0
Else;


.. und habe nun folgendes Problem; das Programm springt immer in den Else-Zweig, liefert also "False" zurück und das, obwohl YQ="Une" ist und "X1="Si2" ist.

Ist nun meine Bedingung falsch geschrieben oder wie? Ich meine, daß kann doch nicht sein. Falls es nicht ersichtlich ist, die Bedingung soll frei übersetzt heißen:

Wenn X1="Une" und entweder X1="Si1" oder X2="Si2" dann soll C1=0 werden.. :-)


Klabautermann - Mo 11.08.03 14:20

Hallo,

eigentlich macht die Anweisung einen korrekten eindruck. Hast du die Groß- & Kleinschreibung beachtet?
Wenn du willst, dass diese Egal ist musst du das so machen:

Delphi-Quelltext
1:
2:
3:
If (AnsiUpperCase(YQ)='UNE'And ((AnsiUpperCase(X1)='SI1'Or (AnsiUpperCase(X1)='SI2')) Then 
  C1:=0 
Else;


Gruß
Klabautermann