Changeset 25 for branches/gbitmap/Packages/FastGraphics/UGGraphics.pas

Timestamp:

Dec 22, 2016, 2:34:33 PM (8 years ago)

Author:

chronos

Message:

• Fixed: Memory leaks introduced by TFColor. TFColor now use reference counting as descendant of IFColor.
• Added: Line drawing for TFPixmap class.

File:

• branches/gbitmap/Packages/FastGraphics/UGGraphics.pas (modified) (1 diff)

branches/gbitmap/Packages/FastGraphics/UGGraphics.pas

@@ -192 +192 @@
     ((Canvas as TGCanvas<TGColor>).Bitmap as TGPixmap<TGColor>).Pixels[Trunc(Position.X + I * (Pos.X - Position.X) / Len),
       Trunc(Position.Y + I * (Pos.Y - Position.Y) / Len)] := Color;
+  Position := Pos;
 end;