Changeset 567 for trunk/Packages/CevoComponents/BaseWin.pas

Timestamp:

May 1, 2024, 8:56:34 PM (7 months ago)

Author:

chronos

Message:

• Fixed: Init offscreen bitmap with solid black color.

File:

• trunk/Packages/CevoComponents/BaseWin.pas (modified) (1 diff)

trunk/Packages/CevoComponents/BaseWin.pas

@@ -493 +493 @@
   if (Offscreen.Width <> NewWidth) or (Offscreen.Height <> NewHeight) then begin
     Offscreen.SetSize(NewWidth, NewHeight);
+    Offscreen.Canvas.Brush.Color := clBlack;
+    Offscreen.Canvas.Brush.Style := TBrushStyle.bsSolid;
     Offscreen.Canvas.FillRect(0, 0, Offscreen.Width, OffScreen.Height);
     Offscreen.Canvas.Brush.Style := TBrushStyle.bsClear;