Fixed a bug with PointToFloatPoint conversion (was instead converting…

… FixedPoints)
graphics32 · Sep 3, 2017 · d513ad3 · d513ad3
1 parent c86ddfc
commit d513ad3
Showing 1 changed file with 4 additions and 4 deletions.
diff --git a/Source/GR32_VectorUtils.pas b/Source/GR32_VectorUtils.pas
@@ -3204,8 +3204,8 @@ function PointToFloatPoint(const Points: TArrayOfPoint): TArrayOfFloatPoint;
     SetLength(Result, Length(Points));
     for Index := 0 to Length(Points) - 1 do
     begin
-      Result[Index].X := Points[Index].X * FixedToFloat;
-      Result[Index].Y := Points[Index].Y * FixedToFloat;
+      Result[Index].X := Points[Index].X;
+      Result[Index].Y := Points[Index].Y;
     end;
   end;
 end;
@@ -3222,8 +3222,8 @@ function PointToFloatPoint(const Points: TArrayOfArrayOfPoint): TArrayOfArrayOfF
       SetLength(Result[Index], Length(Points[Index]));
       for PointIndex := 0 to Length(Points[Index]) - 1 do
       begin
-        Result[Index, PointIndex].X := Points[Index, PointIndex].X * FixedToFloat;
-        Result[Index, PointIndex].Y := Points[Index, PointIndex].Y * FixedToFloat;
+        Result[Index, PointIndex].X := Points[Index, PointIndex].X;
+        Result[Index, PointIndex].Y := Points[Index, PointIndex].Y;
       end;
     end;
   end;