Changeset 5 for trunk/Game2048.lpr


Ignore:
Timestamp:
Sep 24, 2019, 10:09:45 PM (5 years ago)
Author:
chronos
Message:
  • Added: Show game score.
  • Fixed: Make cell font smaller if text is too width.
Location:
trunk
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trunk

    • Property svn:ignore

      •  

        old new  
        11Game2048
        22Game2048.lps
         3Game2048.dbg
        34lib
         5heaptrclog.trc

  • trunk/Game2048.lpr

    r2 r5  
    77  cthreads,
    88  {$ENDIF}{$ENDIF}
    9   Interfaces, // this includes the LCL widgetset
     9  Interfaces, SysUtils,// this includes the LCL widgetset
    1010  Forms, UFormMain, UGame, UFormNew
    1111  { you can add units after this };
    … …  
    1313{$R *.res}
    1414
     15{$if declared(UseHeapTrace)}
     16const
     17  HeapTraceLog = 'heaptrclog.trc';
     18{$ENDIF}
     19
     20
    1521begin
     22  {$if declared(UseHeapTrace)}
     23  DeleteFile(ExtractFilePath(ParamStr(0)) + HeapTraceLog);
     24  SetHeapTraceOutput(ExtractFilePath(ParamStr(0)) + HeapTraceLog);
     25  {$ENDIF}
    1626  RequireDerivedFormResource:=True;
    1727  Application.Initialize;
Note: See TracChangeset for help on using the changeset viewer.