Changeset 190 for branches/generator/Forms/UFormRules.lfm
- Timestamp:
- May 16, 2019, 11:45:39 PM (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/generator/Forms/UFormRules.lfm
r137 r190 1 1 object FormRules: TFormRules 2 2 Left = 348 3 Height = 6113 Height = 916 4 4 Top = 230 5 Width = 8575 Width = 1286 6 6 Caption = 'Rules' 7 ClientHeight = 611 8 ClientWidth = 857 7 ClientHeight = 916 8 ClientWidth = 1286 9 DesignTimePPI = 144 9 10 OnClose = FormClose 10 11 OnCreate = FormCreate 11 12 OnShow = FormShow 12 LCLVersion = ' 1.8.0.4'13 LCLVersion = '2.0.2.0' 13 14 object CoolBar1: TCoolBar 14 15 Left = 0 15 Height = 3216 Top = 57917 Width = 85716 Height = 48 17 Top = 868 18 Width = 1286 18 19 Align = alBottom 19 20 Bands = < … … 23 24 end> 24 25 Images = Core.ImageList1 26 ParentFont = False 25 27 object ToolBar1: TToolBar 26 28 AnchorSideLeft.Control = CoolBar1 27 29 AnchorSideTop.Control = CoolBar1 28 30 Left = 24 29 Height = 2831 Height = 33 30 32 Top = 5 31 Width = 8833 Width = 106 32 34 Align = alNone 33 35 AutoSize = True … … 37 39 EdgeOuter = esNone 38 40 Images = Core.ImageList1 41 ParentFont = False 39 42 ParentShowHint = False 40 43 ShowHint = True … … 47 50 end 48 51 object ToolButton2: TToolButton 49 Left = 3 052 Left = 36 50 53 Top = 0 51 54 Action = AModify 52 55 end 53 56 object ToolButton3: TToolButton 54 Left = 5957 Left = 71 55 58 Top = 0 56 59 Action = ARemove … … 59 62 end 60 63 object ListView1: TListView 61 Left = 462 Height = 57163 Top = 464 Width = 84964 Left = 6 65 Height = 856 66 Top = 6 67 Width = 1274 65 68 Align = alClient 66 BorderSpacing.Around = 469 BorderSpacing.Around = 6 67 70 Columns = < 68 71 item 69 72 Caption = 'Name' 70 Width = 20073 Width = 300 71 74 end 72 75 item 73 76 Caption = 'Node' 74 Width = 8077 Width = 120 75 78 end 76 79 item 77 80 Caption = 'Items' 78 Width = 40081 Width = 600 79 82 end 80 83 item 81 84 Caption = 'Char length' 82 Width = 8085 Width = 120 83 86 end 84 87 item 85 88 Caption = 'Level' 86 Width = 7089 Width = 119 87 90 end> 88 91 MultiSelect = True 89 92 OwnerData = True 93 ParentFont = False 90 94 PopupMenu = PopupMenu1 91 95 ReadOnly = True … … 100 104 object ActionList1: TActionList 101 105 Images = Core.ImageList1 102 left = 248103 top = 212106 left = 372 107 top = 318 104 108 object AAdd: TAction 105 109 Caption = 'Add' … … 125 129 object PopupMenu1: TPopupMenu 126 130 Images = Core.ImageList1 127 left = 427128 top = 212131 left = 641 132 top = 318 129 133 object MenuItem1: TMenuItem 130 134 Action = AAdd … … 143 147 Column = 0 144 148 Order = soUp 145 left = 574146 top = 212149 left = 861 150 top = 318 147 151 end 148 152 end
Note:
See TracChangeset
for help on using the changeset viewer.