Berechnung mit Double

[ByStones2]

Hey danke das geht, nur ergibt sich bei der Rechnung
150 * 0,8 bei mit nun 150 und das kann doch nicht sein, dass müsste 120 geben ???
habt ihr vielleicht auch dafür eine Lösung ???

Delphi-Quellcode:

if get = 2 then
  begin
    if mais < 40000 then
      begin
        mais := mais + Felder * 150;
        Panel12.Caption := floattostr(mais) + 'kg';
      end;
  end;

der rest des quellcodes für diese funktion ist ja schon oben