Größer als und kleiner als

[Rociel]

Delphi-Quellcode:

procedure TForm2.FormCreate(Sender: TObject);
var zahl1,zahl2:real;
begin
Zahl1:=19;zahl2:=19;
if (Zahl1 >= 19) and (Zahl1 <= 24)and
(Zahl2 >= 19) and (Zahl2 <= 24) then
begin
Label1.Caption := 'Zahl1/Zahl2 zwischen 19 und 24';
end else
begin
Label1.Caption := 'mh ?!';
end;
end;

funktioniert wunderbar

[DeddyH]

Das hatte ich in #7 bereits geschrieben. :-D

[Rociel]

oh, stimmt =) kommt davon wenn man nebenher noch psycho lernt...

aber damit ist schonmal gezeigt, dass es hier nicht zu zeitabhängigen ergebnissen kommt wie bei den Kirchhoff'schen regeln *rofl*

[Tommy1988]

also mit dem OR

Delphi-Quellcode:

if (BMI >= 19) and (BMI <= 24) or
(Alter >= 19) and (Alter <= 24) then
begin
Label34.Caption := 'Zahl1/Zahl2 zwischen 19 und 24';
end else
begin
Label34.Caption := 'mh ?!';
end;

klappt es schon, aber es wird nur eines von beiden geprüft.

beides auf einmal geht nicht oder ?

[mkinzler]

Ich vermute mal so:

Delphi-Quellcode:

if ((BMI >= 19) and (BMI <= 24)) or ((Alter >= 19) and (Alter <= 24)) then

[DeddyH]

Was steht denn in BMI? Wie oft muss ich das eigentlich noch fragen?

[mkinzler]

BMI = Body Mass Index

[Rociel]

also wenn du ein or setzt, dann muss BMI im Intervall liegen, Alter im Intervall, oder beides drin liegen.

wenn du anstatt dem or n and setzt, müssen zwngsläufig BMI UND Alter im Intervall liegen, sonst wird else aufgerufen

[Tommy1988]

Mhh.. ist der BMI über 24 wird nicht der else-block angezeigt..

das wird einfach ignoriert..

Edit:

Delphi-Quellcode:

if ((BMI >= 19) and (BMI <= 24)) { and hier statt or}and
((Alter >= 19) and (Alter <= 24)) then

so klappts

danke an eure tipps. werd mir das mal alles angucken.

@mkinzler:

was bedeuten die 2 einklammerungen die du dazugeschrieben hast?
was sagen die aus?

[mkinzler]

Was sollen denn die Alternativen sein?