Problem mit 2 Bedingungen in einer IF Schleife!

[Zwock]

Ahh! Ich habe das Problem gelöst!
Das Problem lag in meiner Berechnung des IdealHigh und IdealLow Wertes, denn in der Form wie ich sie geschrieben hatte.

Siehe hier:

Delphi-Quellcode:

IdealHigh:= StrToFloat(EHeight.Text) - 100;
     IdealHigh:= IdealHigh * 0.92;
     IdealLow:= StrToFloat(EHeight.Text) - 100;
     IdealLow:= IdealLow * 0.88;

Kamen falsche Ergebnisse heraus, d.h. das Idealgewicht lag nur deutlich höher als ich erwartet hatte. Und ich habe es nicht gemerkt, weil ich zum Testen nur Extreme benutzte (z.B. 150 cm auf 1 Kg, oder 1000 Kg). Das Idealgewicht hätte durch diese Fehlberechnung ca. bei 750 KG gelegen (Schätzungsweise).

Als ich dies merkte schrieb ich die Berechnung um:

Delphi-Quellcode:

IdealHigh:= (StrToFloat(EHeight.Text) - 100) * 0.97;
    IdealLow:= (StrToFloat(EHeight.Text) - 100) * 0.93;

Nun kommen die richtigen Werte heraus! Ich wundere mich aber, warum die alte Schreibweise nicht klappte... Einzige Erklärung die ich mir persönlich geben kann:
Der Wert der Variable wurde bei der zweiten Rechnung, nicht wie gewollt um 100 reduziert... Warum auch immer... Vielleicht kann mich ja jmd. aufklären... Aber ich danke euch trotzdem für eure Hilfe, ihr seid echt spitze!