Changeset 333 for trunk


Ignore:
Timestamp:
Aug 27, 2024, 4:13:10 PM (3 months ago)
Author:
chronos
Message:
  • Fixed: Store client form settings on close.
Location:
trunk
Files:
3 edited

Legend:

Unmodified
Added
Removed

  • trunk/Forms/FormClient.pas

    r318 r333  
    66  Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, ExtCtrls,
    77  Game, LCLType, Menus, ActnList, ComCtrls, dateutils, XMLConf, DOM, Math,
    8   Geometry, GameClient, GameProtocol, Threading, Player, ClientGUI,
    9   FormEx, Generics.Collections;
     8  Geometry, GameClient, GameProtocol, Threading, Player, ClientGUI, FormEx,
     9  Generics.Collections;
    1010
    1111const

  • trunk/Forms/FormMain.pas

    r331 r333  
    249249begin
    250250  Core.Core.Game.Running := False;
     251  FormClient.Close;
    251252  SaveConfig(Core.Core.XMLConfig1, 'FormMain');
    252253  Core.Core.CellGridVisible := AMapGridVisible.Checked;

  • trunk/xtactics.lpi

    r326 r333  
    110110      </Item6>
    111111    </RequiredPackages>
    112     <Units Count="40">
     112    <Units Count="39">
    113113      <Unit0>
    114114        <Filename Value="xtactics.lpr"/>
    … …  
    248248      </Unit24>
    249249      <Unit25>
    250         <Filename Value="Forms/FormKeyShortcuts.pas"/>
    251         <IsPartOfProject Value="True"/>
    252         <ComponentName Value="FormKeyShortcuts"/>
    253         <HasResources Value="True"/>
    254         <ResourceBaseClass Value="Form"/>
     250        <Filename Value="Packages/PinConnection/CommFrame.pas"/>
     251        <IsPartOfProject Value="True"/>
    255252      </Unit25>
    256253      <Unit26>
    257         <Filename Value="Packages/PinConnection/CommFrame.pas"/>
     254        <Filename Value="MapType.pas"/>
    258255        <IsPartOfProject Value="True"/>
    259256      </Unit26>
    260257      <Unit27>
    261         <Filename Value="MapType.pas"/>
     258        <Filename Value="Map.pas"/>
    262259        <IsPartOfProject Value="True"/>
    263260      </Unit27>
    264261      <Unit28>
    265         <Filename Value="Map.pas"/>
     262        <Filename Value="Player.pas"/>
    266263        <IsPartOfProject Value="True"/>
    267264      </Unit28>
    268265      <Unit29>
    269         <Filename Value="Player.pas"/>
     266        <Filename Value="ClientGUI.pas"/>
    270267        <IsPartOfProject Value="True"/>
    271268      </Unit29>
    272269      <Unit30>
    273         <Filename Value="ClientGUI.pas"/>
    274         <IsPartOfProject Value="True"/>
     270        <Filename Value="Unit.pas"/>
     271        <IsPartOfProject Value="True"/>
     272        <UnitName Value="&amp;Unit"/>
    275273      </Unit30>
    276274      <Unit31>
    277         <Filename Value="Unit.pas"/>
    278         <IsPartOfProject Value="True"/>
    279         <UnitName Value="&amp;Unit"/>
     275        <Filename Value="GameSystem.pas"/>
     276        <IsPartOfProject Value="True"/>
    280277      </Unit31>
    281278      <Unit32>
    282         <Filename Value="GameSystem.pas"/>
     279        <Filename Value="Building.pas"/>
    283280        <IsPartOfProject Value="True"/>
    284281      </Unit32>
    285282      <Unit33>
    286         <Filename Value="Building.pas"/>
    287         <IsPartOfProject Value="True"/>
     283        <Filename Value="Forms/FormGameSystem.pas"/>
     284        <IsPartOfProject Value="True"/>
     285        <ComponentName Value="FormGameSystem"/>
     286        <HasResources Value="True"/>
     287        <ResourceBaseClass Value="Form"/>
    288288      </Unit33>
    289289      <Unit34>
    290         <Filename Value="Forms/FormGameSystem.pas"/>
    291         <IsPartOfProject Value="True"/>
    292         <ComponentName Value="FormGameSystem"/>
     290        <Filename Value="Forms/FormGameSystems.pas"/>
     291        <IsPartOfProject Value="True"/>
     292        <ComponentName Value="FormGameSystems"/>
    293293        <HasResources Value="True"/>
    294294        <ResourceBaseClass Value="Form"/>
    295295      </Unit34>
    296296      <Unit35>
    297         <Filename Value="Forms/FormGameSystems.pas"/>
    298         <IsPartOfProject Value="True"/>
    299         <ComponentName Value="FormGameSystems"/>
    300         <HasResources Value="True"/>
    301         <ResourceBaseClass Value="Form"/>
     297        <Filename Value="Nation.pas"/>
     298        <IsPartOfProject Value="True"/>
    302299      </Unit35>
    303300      <Unit36>
    304         <Filename Value="Nation.pas"/>
     301        <Filename Value="ItemList.pas"/>
    305302        <IsPartOfProject Value="True"/>
    306303      </Unit36>
    307304      <Unit37>
    308         <Filename Value="ItemList.pas"/>
    309         <IsPartOfProject Value="True"/>
     305        <Filename Value="Forms/FormList.pas"/>
     306        <IsPartOfProject Value="True"/>
     307        <ComponentName Value="FormList"/>
     308        <HasResources Value="True"/>
     309        <ResourceBaseClass Value="Form"/>
    310310      </Unit37>
    311311      <Unit38>
    312         <Filename Value="Forms/FormList.pas"/>
    313         <IsPartOfProject Value="True"/>
    314         <ComponentName Value="FormList"/>
     312        <Filename Value="Forms/FormItem.pas"/>
     313        <IsPartOfProject Value="True"/>
     314        <ComponentName Value="FormItem"/>
    315315        <HasResources Value="True"/>
    316316        <ResourceBaseClass Value="Form"/>
    317317      </Unit38>
    318       <Unit39>
    319         <Filename Value="Forms/FormItem.pas"/>
    320         <IsPartOfProject Value="True"/>
    321         <ComponentName Value="FormItem"/>
    322         <HasResources Value="True"/>
    323         <ResourceBaseClass Value="Form"/>
    324       </Unit39>
    325318    </Units>
    326319  </ProjectOptions>
Note: See TracChangeset for help on using the changeset viewer.