Changeset 33 for trunk


Ignore:
Timestamp:
Jan 8, 2016, 4:59:45 PM (9 years ago)
Author:
chronos
Message:
  • Modified: No need to erase background of main form as everything is covered by game engine.
File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/Forms/UMainForm.pas

    r32 r33  
    88  Registry, Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, ExtCtrls,
    99  ComCtrls, Menus, ActnList, UCore, UPlatform, Math, DateUtils, GraphType,
    10   UPersistentForm, UApplicationInfo, UCoolTranslator;
     10  UPersistentForm, UApplicationInfo, UCoolTranslator, LCLType;
    1111
    1212type
     
    5353    procedure TimerDrawTimer(Sender: TObject);
    5454    procedure TimerEngineTickTimer(Sender: TObject);
     55    procedure EraseBackground(DC: HDC); override;
    5556  private
    5657    OriginalBounds: TRect;
     
    110111end;
    111112
     113procedure TMainForm.EraseBackground(DC: HDC);
     114begin
     115  // Do nothing
     116end;
     117
    112118procedure TMainForm.FormCreate(Sender: TObject);
    113119begin
Note: See TracChangeset for help on using the changeset viewer.