Ignore:
Timestamp:
Jun 21, 2024, 12:44:53 PM (5 months ago)
Author:
chronos
Message:
  • Modified: Remove U prefix from unit names.
  • Modified: Use TFormEx for all forms for code simplification.
File:
1 moved

Legend:

Unmodified
Added
Removed

  • trunk/Forms/FormGameSystem.lfm

    r316 r317  
    11object FormGameSystem: TFormGameSystem
    2   Left = 571
    3   Height = 482
    4   Top = 364
    5   Width = 651
     2  Left = 954
     3  Height = 578
     4  Top = 479
     5  Width = 781
    66  Caption = 'Game system'
    7   ClientHeight = 482
    8   ClientWidth = 651
    9   DesignTimePPI = 120
    10   OnClose = FormClose
     7  ClientHeight = 578
     8  ClientWidth = 781
     9  DesignTimePPI = 144
    1110  OnCreate = FormCreate
    1211  OnDestroy = FormDestroy
    13   OnShow = FormShow
    14   LCLVersion = '2.0.0.4'
     12  LCLVersion = '3.4.0.0'
    1513  object ButtonSave: TButton
    16     Left = 133
    17     Height = 32
    18     Top = 440
    19     Width = 94
     14    Left = 160
     15    Height = 38
     16    Top = 528
     17    Width = 113
    2018    Anchors = [akLeft, akBottom]
    2119    Caption = 'Save'
    22     OnClick = ButtonSaveClick
    2320    ParentFont = False
    2421    TabOrder = 0
     22    OnClick = ButtonSaveClick
    2523  end
    2624  object ButtonLoad: TButton
    27     Left = 20
    28     Height = 32
    29     Top = 440
    30     Width = 94
     25    Left = 24
     26    Height = 38
     27    Top = 528
     28    Width = 113
    3129    Anchors = [akLeft, akBottom]
    3230    Caption = 'Load'
    33     OnClick = ButtonLoadClick
    3431    ParentFont = False
    3532    TabOrder = 1
     33    OnClick = ButtonLoadClick
    3634  end
    3735  object ButtonCancel: TButton
    38     Left = 420
    39     Height = 32
    40     Top = 440
    41     Width = 94
     36    Left = 504
     37    Height = 38
     38    Top = 528
     39    Width = 113
    4240    Anchors = [akRight, akBottom]
    4341    Caption = 'Cancel'
    … …  
    4745  end
    4846  object ButtonOk: TButton
    49     Left = 539
    50     Height = 32
    51     Top = 440
    52     Width = 94
     47    Left = 646
     48    Height = 38
     49    Top = 528
     50    Width = 113
    5351    Anchors = [akRight, akBottom]
    5452    Caption = 'OK'
    … …  
    5856  end
    5957  object PageControl1: TPageControl
    60     Left = 13
    61     Height = 414
    62     Top = 13
    63     Width = 620
     58    Left = 16
     59    Height = 496
     60    Top = 16
     61    Width = 743
    6462    ActivePage = TabSheetBuildings
    6563    Anchors = [akTop, akLeft, akRight, akBottom]
    … …  
    7068      Caption = 'General'
    7169      ClientHeight = 456
    72       ClientWidth = 734
     70      ClientWidth = 733
    7371      ParentFont = False
    7472      object CheckBoxEmptyCellsNeutral: TCheckBox
    75         Left = 13
     73        Left = 16
    7674        Height = 30
    77         Top = 13
    78         Width = 362
     75        Top = 16
     76        Width = 357
    7977        Caption = 'Set cells without player units as neutral'
    8078        ParentFont = False
    … …  
    8280      end
    8381      object CheckBoxUnitsSplitMerge: TCheckBox
    84         Left = 13
     82        Left = 16
    8583        Height = 30
    86         Top = 46
    87         Width = 231
     84        Top = 55
     85        Width = 229
    8886        Caption = 'Units can split or merge'
    8987        ParentFont = False
    … …  
    9189      end
    9290      object CheckBoxUnitsMoveImmediately: TCheckBox
    93         Left = 13
     91        Left = 16
    9492        Height = 30
    95         Top = 79
    96         Width = 234
     93        Top = 95
     94        Width = 232
    9795        Caption = 'Units move immediately'
    9896        ParentFont = False
    … …  
    114112  end
    115113  object OpenDialog1: TOpenDialog
    116     left = 367
    117     top = 133
     114    Left = 440
     115    Top = 160
    118116  end
    119117  object SaveDialog1: TSaveDialog
    120     left = 193
    121     top = 133
     118    Left = 232
     119    Top = 160
    122120  end
    123121end
Note: See TracChangeset for help on using the changeset viewer.