Delphi-Quellcode:
if StrTofloat(Resistor)>999 then begin //kohm
pnl_calculated_resistor.caption := FloatToStr( Runden( ( strtofloat(resistor) / 1000) , 2)) +' KOhm';
end;
if StrTofloat(Resistor)<1000 then begin //ohm
pnl_calculated_resistor.caption := FloatToStr( Runden( ( strtofloat(resistor)/ 1), 2))+' kOhm'; end;
Deine Klammern waren nicht korrekt, hoffe ich habe sie richtig korrigiert.
Grüße
Klaus