[DUnit] Test für Double Property schlägt fehl

[Zwoetzen]

Hi DP'ler,

habe mich nun mal mit DUnit vertraut gemacht, und finde das ganze recht hilfreich ^^
Doch ich stehe vor einem Problem, was ich nicht nachvollziehen kann:

Ich habe eine Klasse, die einen Double-Wert als Property hat:

Delphi-Quellcode:

type
  TMyObjet = class(TObject)
  private
    FD: Double;
    procedure SetD(const Value: Double);
  public
    property D: Double read FD write SetD;
  end;

[...]

procedure TMyObjet.SetD(const Value: Double);
begin
  FD := Value;
end;

Der dazugehörige, sehr einfache Test schlägt allerdings schon fehl:

Delphi-Quellcode:

type
  TestMyObject = class(TTestCase)
  strict private
    FMyObject: TMyObject;
  protected
    procedure SetUp; override;
    procedure TearDown; override;
  published
    procedure TestDouble;
  end;

[...]

procedure TestMyObject.TestDouble;
begin
  FMyObject.D := 1.23;
  CheckEquals(1.23, FMyObject.D, 'Wrong Value of D');
end;

Wenn ich den Test nun ausführe, bekomme ich die Meldung:

Code:

TestDouble: ETestFailure
at  $004A3FED
Wrong Value of D, expected: <1,23> but was: <1,23>

Kann mir jemand den Fehler sagen? Denn die Zuweisung des Doubles sollte eigentlich korrekt sein (da passiert ja eigentlich nix ^^), nur der Test schlägt eben fehl, was mich verwundert. (Die Meldung selbst sagt ja, dass (korrekterweise) 1.23 vorhanden war, aber wieso gibt es trotzdem ein ETestFailure?)

MfG Zwoetzen