Changeset 565 for trunk/LocalPlayer/Rates.pas

Timestamp:

May 1, 2024, 12:08:20 PM (3 weeks ago)

Author:

chronos

Message:

• Modified: Start form changed to use Offscreen bitmap for drawing as Qt5 doesn't support copying from form canvas.

File:

• trunk/LocalPlayer/Rates.pas (modified) (2 diffs)

trunk/LocalPlayer/Rates.pas

@@ -21 +21 @@
     procedure FormCreate(Sender: TObject);
     procedure TaxLuxBtnClick(Sender: TObject);
+  protected
+    procedure OffscreenPaint; override;
   public
-    procedure OffscreenPaint; override;
     procedure ShowNewContent(NewMode: TWindowMode);
   end;
@@ -48 +49 @@
   S, s1: string;
 begin
-  if (OffscreenUser <> nil) and (OffscreenUser <> Self) then
-    OffscreenUser.Update;
-  // complete working with old owner to prevent rebound
-  OffscreenUser := Self;
+  inherited;
 
   Fill(Offscreen.Canvas, 0, 0, ClientWidth, ClientHeight,