Changeset 22


Ignore:
Timestamp:
Apr 8, 2015, 11:15:08 PM (11 years ago)
Author:
chronos
Message:
  • Modify: Use opaque flag on PaintBox as Engine is responsible for clearing background.
Location:
trunk
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trunk/UFormMain.lfm

    r21 r22  
    1212  OnShow = FormShow
    1313  LCLVersion = '1.5'
     14  WindowState = wsMaximized
    1415  object PaintBox1: TPaintBox
    1516    Left = 0

  • trunk/UFormMain.pas

    r21 r22  
    4949begin
    5050  Engine := TEngine.Create;
     51  PaintBox1.ControlStyle := [csOpaque];
    5152end;
    5253
Note: See TracChangeset for help on using the changeset viewer.