Changeset 9 for trunk/GameServer.pas


Ignore:
Timestamp:
Jan 7, 2017, 1:28:56 PM (7 years ago)
Author:
chronos
Message:
  • Modified: Converted to Lazarus project. Application can be run with errors.
Location:
trunk
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trunk

    • Property svn:ignore

      •  

        old new  
        66Win32
        77*.~dsk
         8C-evo.exe
         9Integrated.compiled
         10Integrated.lps
         11lib

  • trunk/GameServer.pas

    r6 r9  
    1 {$INCLUDE switches}
     1{$INCLUDE Switches.pas}
    22// {$DEFINE TEXTLOG}
    33// {$DEFINE LOADPERF}
    … …  
    77
    88uses
    9   Protocol, Database;
     9  Protocol, Database, dynlibs, Windows;
    1010
    1111const
    … …  
    9999  Directories, CityProcessing, UnitProcessing, CmdList,
    100100
    101   Windows, Classes, SysUtils;
     101  LCLIntf, LCLType, LMessages, Classes, SysUtils;
    102102
    103103var
    … …  
    15361536          inc(nTech[pTurn]);
    15371537          if Mode >= moMovie then
    1538             CallPlayer(cShowGreatLibTech, pTurn, ad);
     1538            // TODO CallPlayer(cShowGreatLibTech, pTurn, ad);
    15391539          // do not call CallPlayer(pTurn) while map is invalid
    15401540        end;
Note: See TracChangeset for help on using the changeset viewer.