double in Schleife und Nachkommastellen

[MyRealName]

Wir haben das immer mit der Funktion SameValue gelöst :

Code:

uses
  Math;

var
  Value1, Value2: Double;
begin
  Value1 := 3.14159265358979;
  Value2 := 3.14159265358978;

  if SameValue(Value1, Value2) then
    ShowMessage('Die Werte sind gleich.')
  else
    ShowMessage('Die Werte sind unterschiedlich.');
end;

Als 3. Parameter hat man noch den Epsilon Wert, wo Du sozusagen die Toleranz einstellen kannst

Code:

function SameValue(A, B: Double; Epsilon: Double = 1E-12): Boolean;

Sorry, Du willst ja nicht auf den gleichen Wert vergleichen, sondern ob etwas grösser ist, dazu nimmt man CompareValue

Code:

function CompareValue(const A, B: Extended; Epsilon: Extended): TValueRelationship;

TValueRelationship gibt dir dann zurück, ob es Grösser, kleiner oder gleich ist...