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/FormGameSystems.lfm

    r316 r317  
    11object FormGameSystems: TFormGameSystems
    2   Left = 779
    3   Height = 300
    4   Top = 236
    5   Width = 400
     2  Left = 1080
     3  Height = 360
     4  Top = 570
     5  Width = 480
    66  Caption = 'Game systems'
    7   ClientHeight = 300
    8   ClientWidth = 400
    9   DesignTimePPI = 120
    10   OnClose = FormClose
     7  ClientHeight = 360
     8  ClientWidth = 480
     9  DesignTimePPI = 144
    1110  OnCreate = FormCreate
    1211  OnDestroy = FormDestroy
    1312  OnShow = FormShow
    14   LCLVersion = '2.0.0.4'
     13  LCLVersion = '3.4.0.0'
    1514  object ListView1: TListView
    1615    Left = 0
    17     Height = 268
     16    Height = 322
    1817    Top = 0
    19     Width = 400
     18    Width = 480
    2019    Align = alClient
    2120    Columns = <   
    2221      item
    2322        Caption = 'Name'
    24         Width = 388
     23        Width = 466
    2524      end>
    2625    MultiSelect = True
    … …  
    3938  object ToolBar1: TToolBar
    4039    Left = 0
    41     Top = 268
    42     Width = 400
     40    Height = 38
     41    Top = 322
     42    Width = 480
    4343    Align = alBottom
    4444    Images = Core.ImageListSmall
    … …  
    5151    end
    5252    object ToolButton2: TToolButton
    53       Left = 30
     53      Left = 36
    5454      Top = 2
    5555      Action = AModify
    5656    end
    5757    object ToolButton3: TToolButton
    58       Left = 59
     58      Left = 71
    5959      Top = 2
    6060      Action = ARemove
    6161    end
    6262    object ToolButton4: TToolButton
    63       Left = 88
     63      Left = 106
    6464      Top = 2
    6565      Action = AClone
    … …  
    6868  object ActionList1: TActionList
    6969    Images = Core.ImageListSmall
    70     left = 173
    71     top = 136
     70    Left = 208
     71    Top = 163
    7272    object AAdd: TAction
    7373      Caption = 'Add'
    … …  
    9797  object PopupMenu1: TPopupMenu
    9898    Images = Core.ImageListSmall
    99     left = 293
    100     top = 133
     99    Left = 352
     100    Top = 160
    101101    object MenuItem1: TMenuItem
    102102      Action = AAdd
Note: See TracChangeset for help on using the changeset viewer.