source: trunk/Forms/FormAcronyms.lfm

Last change on this file was 230, checked in by chronos, 5 months ago
  • Modified: Fixed Import sources modification.
  • Modified: Catogires don't have direct object references to import sources and acronym meanings.
  • Modified: Updated acronyms example file.
File size: 3.4 KB
Line 
1object FormAcronyms: TFormAcronyms
2 Left = 755
3 Height = 670
4 Top = 284
5 Width = 888
6 Caption = 'Acronyms'
7 ClientHeight = 670
8 ClientWidth = 888
9 DesignTimePPI = 144
10 OnActivate = FormActivate
11 OnCreate = FormCreate
12 OnShow = FormShow
13 Position = poScreenCenter
14 LCLVersion = '3.6.0.0'
15 object ListViewAcronyms: TListView
16 Left = 5
17 Height = 563
18 Top = 41
19 Width = 878
20 Align = alClient
21 BorderSpacing.Left = 5
22 BorderSpacing.Right = 5
23 BorderSpacing.Bottom = 5
24 Columns = <
25 item
26 Caption = 'Name'
27 Width = 120
28 end
29 item
30 Caption = 'Description'
31 Width = 360
32 end
33 item
34 Caption = 'Categories'
35 Width = 383
36 end>
37 MultiSelect = True
38 OwnerData = True
39 PopupMenu = PopupMenuAcronym
40 ReadOnly = True
41 RowSelect = True
42 TabOrder = 0
43 ViewStyle = vsReport
44 OnData = ListViewAcronymsData
45 OnDblClick = ListViewAcronymsDblClick
46 OnKeyPress = ListViewAcronymsKeyPress
47 OnResize = ListViewAcronymsResize
48 OnSelectItem = ListViewAcronymsSelectItem
49 end
50 object ListViewFilter1: TListViewFilter
51 Left = 5
52 Height = 36
53 Top = 5
54 Width = 878
55 OnChange = ListViewFilter1Change
56 Align = alTop
57 BorderSpacing.Left = 5
58 BorderSpacing.Top = 5
59 BorderSpacing.Right = 5
60 end
61 object ToolBar1: TToolBar
62 AnchorSideBottom.Control = StatusBar1
63 Left = 0
64 Height = 33
65 Top = 609
66 Width = 888
67 Align = alBottom
68 Caption = 'ToolBar1'
69 Images = Core.ImageListSmall
70 ParentShowHint = False
71 ShowHint = True
72 TabOrder = 2
73 object ToolButton1: TToolButton
74 Left = 1
75 Top = 2
76 Action = AAdd
77 end
78 object ToolButton2: TToolButton
79 Left = 36
80 Top = 2
81 Action = AModify
82 end
83 object ToolButton3: TToolButton
84 Left = 71
85 Top = 2
86 Action = ARemove
87 end
88 end
89 object StatusBar1: TStatusBar
90 Left = 0
91 Height = 28
92 Top = 642
93 Width = 888
94 Panels = <
95 item
96 Width = 144
97 end
98 item
99 Width = 144
100 end>
101 SimplePanel = False
102 end
103 object ListViewSort1: TListViewSort
104 ListView = ListViewAcronyms
105 OnCompareItem = ListViewSort1CompareItem
106 OnFilter = ListViewSort1Filter
107 OnColumnWidthChanged = ListViewSort1ColumnWidthChanged
108 Column = 0
109 Order = soUp
110 Left = 298
111 Top = 202
112 end
113 object ActionList1: TActionList
114 Left = 298
115 Top = 278
116 object AAdd: TAction
117 Caption = 'Add'
118 ImageIndex = 0
119 OnExecute = AAddExecute
120 ShortCut = 45
121 end
122 object AModify: TAction
123 Caption = 'Modify'
124 ImageIndex = 3
125 OnExecute = AModifyExecute
126 ShortCut = 13
127 end
128 object ARemove: TAction
129 Caption = 'Remove'
130 ImageIndex = 4
131 OnExecute = ARemoveExecute
132 ShortCut = 46
133 end
134 object ASelectAll: TAction
135 Caption = 'Select all'
136 OnExecute = ASelectAllExecute
137 ShortCut = 16449
138 end
139 end
140 object PopupMenuAcronym: TPopupMenu
141 Images = Core.ImageListSmall
142 Left = 298
143 Top = 355
144 object MenuItem4: TMenuItem
145 Action = AAdd
146 end
147 object MenuItem5: TMenuItem
148 Action = AModify
149 end
150 object MenuItem6: TMenuItem
151 Action = ARemove
152 end
153 object MenuItem7: TMenuItem
154 Action = ASelectAll
155 end
156 end
157end
Note: See TracBrowser for help on using the repository browser.