(cherry picked from commit e80560e59c8abbdd5ec21c445fce25b3627aad3a)
@@ -659,7 +659,11 @@ end;
constructor TCompComponent.Create(AOwner: TComponent);
begin
inherited;
+{$if defined(FPC_COMP_IS_INT64)}
+ F:=Round(4.56);
+{$else defined(FPC_COMP_IS_INT64)}
F:=4.56;
+{$endif defined(FPC_COMP_IS_INT64)}
end;
{ TCurrencyComponent }