Changeset 14 for os/trunk/Drivers/Driver.VideoVCL.pas

Timestamp:

Feb 29, 2016, 5:23:37 PM (8 years ago)

Author:

chronos

Message:

• Modified: TForm title bar implemented using controls.

File:

• os/trunk/Drivers/Driver.VideoVCL.pas (modified) (1 diff)

os/trunk/Drivers/Driver.VideoVCL.pas

@@ -95 +95 @@
   inherited;
   CanvasVCL.Brush.Color := ColorToVCL(Color);
+  CanvasVCL.Brush.Style := bsSolid;
   CanvasVCL.FillRect(System.Types.Rect(Rect.Left, Rect.Top, Rect.Right, Rect.Bottom));
 end;