Changeset 47 for trunk/LocalPlayer


Ignore:
Timestamp:
Jan 11, 2017, 8:31:41 AM (8 years ago)
Author:
chronos
Message:
  • Fixed: All fonts were slightly bigger then under Delphi. Compensated font size using coefficient.
Location:
trunk/LocalPlayer
Files:
4 edited

Legend:

Unmodified
Added
Removed

  • trunk/LocalPlayer/CityType.pas

    r38 r47  
    66uses
    77  Protocol, ClientTools, Term, ScreenTools, BaseWin, LCLIntf, LCLType,
    8 
    9   Messages, SysUtils, Classes, Graphics, Controls, Forms,
    10   ButtonB, ExtCtrls, ButtonA, ButtonBase;
     8  SysUtils, Classes, Graphics, Controls, Forms,
     9  ButtonB, ExtCtrls;
    1110
    1211type

  • trunk/LocalPlayer/Draft.pas

    r40 r47  
    77  Protocol, ClientTools, Term, ScreenTools, PVSB, BaseWin,
    88
    9   LCLIntf, LCLType, LMessages, Messages, SysUtils, Classes, Graphics, Controls, Forms, ExtCtrls,
     9  LCLIntf, LCLType, SysUtils, Classes, Graphics, Controls, Forms, ExtCtrls,
    1010  ButtonA,
    11   ButtonB, ButtonBase, Area;
     11  ButtonB, Area;
    1212
    1313type

  • trunk/LocalPlayer/NatStat.pas

    r40 r47  
    77  Protocol, ClientTools, Term, ScreenTools, BaseWin,
    88
    9   LCLIntf, LCLType, LMessages, Messages, SysUtils, Classes, Graphics, Controls, Forms,
    10   ButtonBase, ButtonB, ButtonC, Menus, EOTButton;
     9  LCLIntf, LCLType, SysUtils, Classes, Graphics, Controls, Forms,
     10  ButtonB, ButtonC, Menus, EOTButton;
    1111
    1212type

  • trunk/LocalPlayer/Term.pas

    r38 r47  
    99{$ENDIF}
    1010  Protocol, Tribes, PVSB, ClientTools, ScreenTools, BaseWin, Messg, ButtonBase,
    11 
    12   LCLIntf, LCLType, LMessages, Messages, SysUtils, Classes, Graphics, Controls,
    13   Forms, Menus,
    14   ExtCtrls, dateutils, Platform,
    15   ButtonA, ButtonB, ButtonC, EOTButton, Area;
     11  LCLIntf, LCLType, SysUtils, Classes, Graphics, Controls,
     12  Forms, Menus, ExtCtrls, dateutils, Platform, ButtonB, ButtonC, EOTButton, Area;
    1613
    1714const
    … …  
    431428uses
    432429  Directories, IsoEngine, CityScreen, Draft, MessgEx, Select, CityType, Help,
    433   UnitStat, Diplomacy, Inp, Log, Diagram, NatStat, Wonders, Enhance, Nego,
    434   Battle, Rates,
    435   TechTree,
    436 
    437   Registry;
     430  UnitStat, Log, Diagram, NatStat, Wonders, Enhance, Nego,
     431  Battle, Rates, TechTree, Registry;
    438432
    439433{$R *.lfm}
    … …  
    49584952  GotoOnly: boolean;
    49594953begin
     4954  Dist := 0;
    49604955  if ClientMode >= scContact then
    49614956    exit;
Note: See TracChangeset for help on using the changeset viewer.