Trunc() probleme

[day]

Hallo,
folgendes Problem tritt bei mir auf:

Ich habe einen Double-Wert den ich je nach Präzision mit dem Faktor 10^präzision multipliziere. Anschliessend möchte ich nur noch den Integeranteil des double wertes.

Delphi-Quellcode:

Weight := 2.4353000;
Weight := Weight * Power( 10, Präzision);

Double1 :=  Weight ;
Double2 :=  Trunc( Weight );

Angenommen wir haben eine Präzision von 4, dann ist der Wert (den ich im Debugger sehe) bei Double1 = 24353. Der Wert in Double2 ist allerdings 24352. Was mache ich falsch?