Hallo,

Wie sage ich Delphi das wenn eine zahl zwischen 18,5 und 25 liegt, das Delphi dann leicht schreiben soll

ich hatte schon einmal angefangen

markieren

Delphi-Quellcode:

  if
    ergebnis 18.5 - 20
  then
    begin
      Image1.Picture.LoadFromFile('grafiken\gruen.bmp');
      Label3.Caption:='Sie haben Normalgewicht';
    end;

kennt jemand eine besser lösung???

if (ergebnis > 18.5) and (ergebnis < 25) then

Versuche mal.

markieren

Delphi-Quellcode:

  if (ergebnis <= 18.5) and (ergebnis > 25) then
    Label1.Caption :='Leicht';

Hoffe ich habe das größer und kleiner Zeichen nicht verwechselt.


--- Edit ---

Wieder mal zu spät und auch noch die Zeichen verwechselt.

@Citybreaker:
Hehe jop Zeichen verwechselt gehört nämlich so:

markieren

Delphi-Quellcode:

 if (ergebnis >= 18.5) and (ergebnis <= 25) then
   Label1.Caption := 'Leicht'
 end;