source: trunk/Forms/UFormMain.lfm

Last change on this file was 208, checked in by chronos, 3 years ago
  • Modified: Show items without active filter text active by default to show supported acronyms immediatelly after application start.
  • Added: Snap package definition file.
File size: 14.8 KB
Line 
1object FormMain: TFormMain
2 Left = 417
3 Height = 747
4 Top = 453
5 Width = 1106
6 Caption = 'Acronym Decoder'
7 ClientHeight = 713
8 ClientWidth = 1106
9 DesignTimePPI = 144
10 Menu = MainMenu1
11 OnClose = FormClose
12 OnCloseQuery = FormCloseQuery
13 OnCreate = FormCreate
14 OnDestroy = FormDestroy
15 OnHide = FormHide
16 OnResize = FormResize
17 OnShow = FormShow
18 LCLVersion = '2.0.12.0'
19 object PanelMain: TPanel
20 Left = 0
21 Height = 605
22 Top = 81
23 Width = 1106
24 Align = alClient
25 BevelOuter = bvNone
26 ClientHeight = 605
27 ClientWidth = 1106
28 ParentFont = False
29 TabOrder = 0
30 object ListViewFilter1: TListViewFilter
31 Left = 5
32 Height = 46
33 Top = 5
34 Width = 1095
35 OnChange = ListViewFilter1Change
36 Anchors = [akTop, akLeft, akRight]
37 end
38 object ListViewAcronyms: TListView
39 Left = 5
40 Height = 549
41 Top = 50
42 Width = 1095
43 Anchors = [akTop, akLeft, akRight, akBottom]
44 Columns = <
45 item
46 Caption = 'Name'
47 Width = 150
48 end
49 item
50 Caption = 'Meaning'
51 Width = 450
52 end
53 item
54 Caption = 'Categories'
55 Width = 521
56 end>
57 OwnerData = True
58 ParentFont = False
59 PopupMenu = PopupMenuFilter
60 ReadOnly = True
61 RowSelect = True
62 TabOrder = 1
63 ViewStyle = vsReport
64 OnData = ListViewAcronymsData
65 OnResize = ListViewAcronymsResize
66 OnSelectItem = ListViewAcronymsSelectItem
67 end
68 end
69 object PanelParam: TPanel
70 Left = 0
71 Height = 38
72 Top = 43
73 Width = 1106
74 Align = alTop
75 BevelOuter = bvNone
76 ClientHeight = 38
77 ClientWidth = 1106
78 ParentFont = False
79 TabOrder = 1
80 object CheckBoxExactLength: TCheckBox
81 Left = 8
82 Height = 38
83 Top = 0
84 Width = 132
85 Action = AFilterSameLength
86 Align = alLeft
87 BorderSpacing.Left = 8
88 ParentFont = False
89 TabOrder = 0
90 end
91 object CheckBoxCaseSensitive: TCheckBox
92 Left = 156
93 Height = 38
94 Top = 0
95 Width = 165
96 Action = AFilterSameLetterCase
97 Align = alLeft
98 BorderSpacing.Left = 16
99 ParentFont = False
100 TabOrder = 1
101 end
102 object CheckBoxEnabledCategories: TCheckBox
103 Left = 337
104 Height = 38
105 Top = 0
106 Width = 187
107 Action = AFilterEnabledCategories
108 Align = alLeft
109 BorderSpacing.Left = 16
110 ParentFont = False
111 TabOrder = 2
112 end
113 object CheckBoxShowItemsWithoutFilter: TCheckBox
114 Left = 540
115 Height = 38
116 Top = 0
117 Width = 237
118 Action = AFilterShowItemsWithoutFilter
119 Align = alLeft
120 BorderSpacing.Left = 16
121 ParentFont = False
122 TabOrder = 3
123 end
124 end
125 object CoolBar1: TCoolBar
126 Left = 0
127 Height = 43
128 Top = 0
129 Width = 1106
130 AutoSize = True
131 Bands = <
132 item
133 Break = False
134 Control = ToolBarFile
135 FixedSize = True
136 MinWidth = 40
137 Width = 164
138 end
139 item
140 Break = False
141 Control = ToolBarManage
142 FixedSize = True
143 MinWidth = 40
144 Width = 149
145 end
146 item
147 Break = False
148 Control = ToolBarOther
149 FixedSize = True
150 MinWidth = 40
151 Width = 91
152 end
153 item
154 Break = False
155 Control = ToolBarFilter
156 FixedSize = True
157 MinWidth = 40
158 Width = 120
159 end>
160 Images = Core.ImageList1
161 ParentFont = False
162 object ToolBarFile: TToolBar
163 AnchorSideLeft.Control = CoolBar1
164 AnchorSideTop.Control = CoolBar1
165 Left = 24
166 Height = 33
167 Top = 5
168 Width = 159
169 Align = alNone
170 AutoSize = True
171 BorderSpacing.Left = 22
172 BorderSpacing.Top = 3
173 EdgeBorders = []
174 EdgeInner = esNone
175 EdgeOuter = esNone
176 Images = Core.ImageList1
177 ParentFont = False
178 ParentShowHint = False
179 ShowHint = True
180 TabOrder = 0
181 Transparent = True
182 object ToolButton1: TToolButton
183 Left = 1
184 Top = 0
185 Action = AFileNew
186 end
187 object ToolButton6: TToolButton
188 Left = 36
189 Top = 0
190 Action = AFileOpen
191 DropdownMenu = PopupMenuOpenRecent
192 Style = tbsDropDown
193 end
194 object ToolButton7: TToolButton
195 Left = 89
196 Top = 0
197 Action = AFileSave
198 end
199 object ToolButton12: TToolButton
200 Left = 124
201 Top = 0
202 Action = AFileClose
203 end
204 end
205 object ToolBarManage: TToolBar
206 AnchorSideLeft.Control = CoolBar1
207 AnchorSideTop.Control = CoolBar1
208 Left = 188
209 Height = 33
210 Top = 5
211 Width = 141
212 Align = alNone
213 AutoSize = True
214 BorderSpacing.Left = 186
215 BorderSpacing.Top = 3
216 EdgeBorders = []
217 EdgeInner = esNone
218 EdgeOuter = esNone
219 Images = Core.ImageList1
220 ParentFont = False
221 ParentShowHint = False
222 ShowHint = True
223 TabOrder = 1
224 Transparent = True
225 object ToolButton2: TToolButton
226 Left = 1
227 Top = 0
228 Action = AShowAcronyms
229 end
230 object ToolButton3: TToolButton
231 Left = 36
232 Top = 0
233 Action = AShowCategories
234 end
235 object ToolButton5: TToolButton
236 Left = 71
237 Top = 0
238 Action = AShowImportSources
239 end
240 object ToolButton4: TToolButton
241 Left = 106
242 Top = 0
243 Action = AShowImportFormats
244 end
245 end
246 object ToolBarOther: TToolBar
247 AnchorSideLeft.Control = CoolBar1
248 AnchorSideTop.Control = CoolBar1
249 Left = 337
250 Height = 33
251 Top = 5
252 Width = 71
253 Align = alNone
254 AutoSize = True
255 BorderSpacing.Left = 335
256 BorderSpacing.Top = 3
257 EdgeBorders = []
258 EdgeInner = esNone
259 EdgeOuter = esNone
260 Images = Core.ImageList1
261 ParentFont = False
262 ParentShowHint = False
263 ShowHint = True
264 TabOrder = 2
265 Transparent = True
266 object ToolButton11: TToolButton
267 Left = 36
268 Top = 0
269 Action = ASettings
270 end
271 object ToolButton9: TToolButton
272 Left = 1
273 Top = 0
274 Action = AProcessImports
275 end
276 end
277 object ToolBarFilter: TToolBar
278 AnchorSideLeft.Control = CoolBar1
279 AnchorSideTop.Control = CoolBar1
280 Left = 428
281 Height = 33
282 Top = 5
283 Width = 106
284 Align = alNone
285 AutoSize = True
286 BorderSpacing.Left = 426
287 BorderSpacing.Top = 3
288 EdgeBorders = []
289 EdgeInner = esNone
290 EdgeOuter = esNone
291 Images = Core.ImageList1
292 ParentFont = False
293 ParentShowHint = False
294 ShowHint = True
295 TabOrder = 3
296 Transparent = True
297 object ToolButton16: TToolButton
298 Left = 1
299 Top = 0
300 Action = AFilterSameLength
301 Style = tbsCheck
302 end
303 object ToolButton13: TToolButton
304 Left = 36
305 Top = 0
306 Action = AFilterSameLetterCase
307 Style = tbsCheck
308 end
309 object ToolButton8: TToolButton
310 Left = 71
311 Top = 0
312 Action = AFilterEnabledCategories
313 Style = tbsCheck
314 end
315 end
316 end
317 object StatusBar1: TStatusBar
318 Left = 0
319 Height = 27
320 Top = 686
321 Width = 1106
322 Panels = <
323 item
324 Width = 300
325 end
326 item
327 Width = 300
328 end>
329 ParentFont = False
330 SimplePanel = False
331 end
332 object ActionList1: TActionList
333 Images = Core.ImageList1
334 Left = 708
335 Top = 288
336 object AExit: TAction
337 Caption = 'Exit'
338 ImageIndex = 2
339 OnExecute = AExitExecute
340 end
341 object AShow: TAction
342 Caption = 'Show'
343 OnExecute = AShowExecute
344 end
345 object AHide: TAction
346 Caption = 'Hide'
347 OnExecute = AHideExecute
348 end
349 object AImport: TAction
350 Caption = 'Import'
351 OnExecute = AImportExecute
352 end
353 object AFileOpen: TAction
354 Caption = 'Open'
355 ImageIndex = 8
356 OnExecute = AFileOpenExecute
357 ShortCut = 16463
358 end
359 object AFileNew: TAction
360 Caption = 'New'
361 ImageIndex = 16
362 OnExecute = AFileNewExecute
363 ShortCut = 16462
364 end
365 object AFileSave: TAction
366 Caption = 'Save'
367 ImageIndex = 10
368 OnExecute = AFileSaveExecute
369 ShortCut = 16467
370 end
371 object AFileClose: TAction
372 Caption = 'Close'
373 ImageIndex = 12
374 OnExecute = AFileCloseExecute
375 end
376 object AFileSaveAs: TAction
377 Caption = 'Save as...'
378 ImageIndex = 10
379 OnExecute = AFileSaveAsExecute
380 ShortCut = 24659
381 end
382 object ASettings: TAction
383 Caption = 'Settings'
384 ImageIndex = 6
385 OnExecute = ASettingsExecute
386 ShortCut = 121
387 end
388 object AShowCategories: TAction
389 Caption = 'Categories'
390 ImageIndex = 11
391 OnExecute = AShowCategoriesExecute
392 ShortCut = 116
393 end
394 object AShowAcronyms: TAction
395 Caption = 'Acronyms'
396 ImageIndex = 15
397 OnExecute = AShowAcronymsExecute
398 ShortCut = 115
399 end
400 object AShowImportSources: TAction
401 Caption = 'Import sources'
402 ImageIndex = 13
403 OnExecute = AShowImportSourcesExecute
404 ShortCut = 117
405 end
406 object AShowAbout: TAction
407 Caption = 'About'
408 ImageIndex = 7
409 OnExecute = AShowAboutExecute
410 end
411 object AShowImportFormats: TAction
412 Caption = 'Import formats'
413 ImageIndex = 14
414 OnExecute = AShowImportFormatsExecute
415 ShortCut = 118
416 end
417 object AProcessImports: TAction
418 Caption = 'Process imports'
419 ImageIndex = 5
420 OnExecute = AProcessImportsExecute
421 ShortCut = 119
422 end
423 object AExport: TAction
424 Caption = 'Export'
425 OnExecute = AExportExecute
426 end
427 object AFilterSameLength: TAction
428 AutoCheck = True
429 Caption = 'Same length'
430 ImageIndex = 18
431 OnExecute = AFilterSameLengthExecute
432 end
433 object AFilterSameLetterCase: TAction
434 AutoCheck = True
435 Caption = 'Same letter case'
436 ImageIndex = 17
437 OnExecute = AFilterSameLetterCaseExecute
438 end
439 object AFilterEnabledCategories: TAction
440 AutoCheck = True
441 Caption = 'Enabled categories'
442 ImageIndex = 19
443 OnExecute = AFilterEnabledCategoriesExecute
444 end
445 object AFilterShowItemsWithoutFilter: TAction
446 AutoCheck = True
447 Caption = 'Show items without filter'
448 OnExecute = AFilterShowItemsWithoutFilterExecute
449 end
450 object AManageAcronym: TAction
451 Caption = 'Manage acronym'
452 OnExecute = AManageAcronymExecute
453 end
454 object ADocumentCheck: TAction
455 Caption = 'Document check'
456 ImageIndex = 20
457 OnExecute = ADocumentCheckExecute
458 end
459 end
460 object MainMenu1: TMainMenu
461 Images = Core.ImageList1
462 Left = 712
463 Top = 204
464 object MenuItem8: TMenuItem
465 Caption = 'File'
466 object MenuItem10: TMenuItem
467 Action = AFileNew
468 end
469 object MenuItem11: TMenuItem
470 Action = AFileOpen
471 end
472 object MenuItemOpenRecent: TMenuItem
473 Caption = 'Open recent'
474 end
475 object MenuItem12: TMenuItem
476 Action = AFileSave
477 end
478 object MenuItem13: TMenuItem
479 Action = AFileSaveAs
480 end
481 object MenuItem14: TMenuItem
482 Action = AFileClose
483 end
484 object MenuItem15: TMenuItem
485 Caption = '-'
486 end
487 object MenuItem9: TMenuItem
488 Action = AExit
489 end
490 end
491 object MenuItem20: TMenuItem
492 Caption = 'View'
493 object MenuItem22: TMenuItem
494 Action = AShowAcronyms
495 end
496 object MenuItem21: TMenuItem
497 Action = AShowCategories
498 end
499 object MenuItem4: TMenuItem
500 Action = AShowImportSources
501 end
502 object MenuItem7: TMenuItem
503 Action = AShowImportFormats
504 end
505 object MenuItem24: TMenuItem
506 Caption = '-'
507 end
508 object MenuItemToolbar: TMenuItem
509 Caption = 'Toolbar'
510 OnClick = MenuItemToolbarClick
511 end
512 object MenuItemParam: TMenuItem
513 Caption = 'Filter parameters'
514 OnClick = MenuItemParamClick
515 end
516 object MenuItemStatusBar: TMenuItem
517 Caption = 'Status bar'
518 OnClick = MenuItemStatusBarClick
519 end
520 end
521 object MenuItem16: TMenuItem
522 Caption = 'Tools'
523 object MenuItem18: TMenuItem
524 Action = ASettings
525 end
526 object MenuItem2: TMenuItem
527 Caption = '-'
528 end
529 object MenuItem17: TMenuItem
530 Action = AImport
531 end
532 object MenuItem25: TMenuItem
533 Action = AExport
534 end
535 object MenuItem23: TMenuItem
536 Action = AProcessImports
537 end
538 object MenuItem3: TMenuItem
539 Action = ADocumentCheck
540 end
541 end
542 object MenuItem5: TMenuItem
543 Caption = 'Help'
544 object MenuItem6: TMenuItem
545 Action = AShowAbout
546 end
547 end
548 end
549 object OpenDialog1: TOpenDialog
550 DefaultExt = '.adp'
551 Left = 120
552 Top = 312
553 end
554 object SaveDialog1: TSaveDialog
555 DefaultExt = '.adp'
556 Filter = 'Acronym Decoder project (.adp)|*.adp|All files|*.*'
557 Left = 120
558 Top = 216
559 end
560 object LastOpenedList1: TLastOpenedList
561 MaxCount = 10
562 OnChange = LastOpenedList1Change
563 Left = 396
564 Top = 360
565 end
566 object ListViewSort1: TListViewSort
567 ListView = ListViewAcronyms
568 OnCompareItem = ListViewSort1CompareItem
569 OnFilter = ListViewSort1Filter
570 OnColumnWidthChanged = ListViewSort1ColumnWidthChanged
571 Column = 2
572 Order = soDown
573 Left = 708
574 Top = 384
575 end
576 object PopupMenuOpenRecent: TPopupMenu
577 Images = Core.ImageList1
578 Left = 120
579 Top = 420
580 end
581 object PopupMenuFilter: TPopupMenu
582 Left = 416
583 Top = 217
584 object MenuItem1: TMenuItem
585 Action = AManageAcronym
586 end
587 object N1: TMenuItem
588 Caption = '-'
589 end
590 object MenuItem26: TMenuItem
591 Action = AFilterSameLength
592 AutoCheck = True
593 end
594 object MenuItem27: TMenuItem
595 Action = AFilterSameLetterCase
596 AutoCheck = True
597 end
598 object MenuItem19: TMenuItem
599 Action = AFilterEnabledCategories
600 AutoCheck = True
601 end
602 object MenuItemShowItemsWithoutFilter: TMenuItem
603 Action = AFilterShowItemsWithoutFilter
604 AutoCheck = True
605 end
606 end
607 object AboutDialog1: TAboutDialog
608 Translator = Core.Translator
609 ThemeManager = Core.ThemeManager
610 ApplicationInfo = Core.ApplicationInfo1
611 Left = 392
612 Top = 448
613 end
614end
Note: See TracBrowser for help on using the repository browser.