Changeset 29 for trunk/Packages/FastGraphics/UFGraphics.pas

Timestamp:

Dec 22, 2016, 9:46:17 PM (8 years ago)

Author:

chronos

Message:

• Modified: Load image data from file quickly using Bitmap RawImage.
• Modified: Remember last selected color format.

File:

• trunk/Packages/FastGraphics/UFGraphics.pas (modified) (4 diffs)

trunk/Packages/FastGraphics/UFGraphics.pas

@@ -45 +45 @@
     procedure PaintToBitmap(Bitmap: TBitmap; Rect: TRect); virtual;
     procedure LoadFromCanvas(Canvas: TCanvas); virtual;
+    procedure LoadFromBitmap(Bitmap: TBitmap); virtual;
     function GetDataSize: Integer; virtual;
     constructor Create; virtual;
@@ -174 +175 @@
     procedure PaintToBitmap(Bitmap: TBitmap; Rect: TRect); overload;
     procedure LoadFromCanvas(Canvas: TCanvas);
+    procedure LoadFromBitmap(Bitmap: TBitmap);
     function GetDataSize: Integer;
     constructor Create(AOwner: TComponent); override;
@@ -383 +385 @@
 end;
 
+procedure TBImage.LoadFromBitmap(Bitmap: TBitmap);
+begin
+end;
+
 function TBImage.GetDataSize: Integer;
 begin
@@ -495 +501 @@
 begin
   Backend.LoadFromCanvas(Canvas);
+end;
+
+procedure TFPixmap.LoadFromBitmap(Bitmap: TBitmap);
+begin
+  Backend.LoadFromBitmap(Bitmap);
 end;