Double und Gleitkommafehler

[MacGuyver]

Moin Leute! :hi:

Mein Delphi kann nicht rechnen, wie blöd:

Delphi-Quellcode:

Var
  lrIst,
  lrSoll       : Double;
  lIst,
  lSoll        : Integer;
  lTmpPercent,
  lLastPercent : Byte;

    Procedure ProgressBar;

    BEGIN
      lrIst:=lIst * 100;
      lrSoll:=lSoll;
->    lrIst:=lrIst / lrSoll;
      lTmpPercent:=Round(lrIst);
      If lLastPercent <> lTmpPercent Then
      Begin
        lLastPercent:=lTmpPercent;
        pbSpezi.Position:=lLastPercent;
        Application.ProcessMessages;
      End;
    END;

Das Programm ist an der mit -> gekennzeichneten Stelle. lIst = 1; lSoll = 330236
Da habe ich die Werte extra in temporäre Variablen geschrieben, und trotzdem. In der mit -> markierten Zeile führt er nur 100/330236 aus und schreibt es wieder in die selbe Variable. Dabei kommt es zum Gleitkommafehler. Kann mir einer sagen, was das soll?

Ein Integer :love: liebender
Stefan

[Mr Whoopee]

nutzt du dafür delphi 3? ^^

[Chewie]

Äh... was genau ist das Problem? Ich habs nicht verstanden. "Gleitkommafehler" kann vieles bedeuten.

[Mr Whoopee]

evtl versuch mal als datentyp "Extended" zu nehmen

[MacGuyver]

Jo,

habe ich ausprobiert, Double gegen Extendet getauscht. Das klappt. :thumb: Bleibt für mich nur die Frage, wieso dieser Fehler auftaucht. Das ist doch Peanutz, das habe ich im Borland Pascal mit dem 6 Byte großen Real nicht geschafft.

Stefan