source: trunk/Packages/Common/Forms/FormKeyShortcuts.lfm

Last change on this file was 219, checked in by chronos, 5 days ago
  • Modified: Updated Common package.
  • Modified: Remove U prefix from unit names.
  • Modified: Use Gneeric.Collections instead of fgl.
  • Modified: Do not use global form variables.
File size: 1.5 KB
Line 
1object FormKeyShortcuts: TFormKeyShortcuts
2 Left = 839
3 Height = 329
4 Top = 609
5 Width = 704
6 Caption = 'Key shortcuts'
7 ClientHeight = 329
8 ClientWidth = 704
9 DesignTimePPI = 144
10 OnCreate = FormCreate
11 OnDestroy = FormDestroy
12 OnShow = FormShow
13 LCLVersion = '3.6.0.0'
14 object ListView1: TListView
15 Left = 10
16 Height = 262
17 Top = 10
18 Width = 684
19 Align = alTop
20 Anchors = [akTop, akLeft, akRight, akBottom]
21 BorderSpacing.Around = 10
22 Columns = <
23 item
24 Caption = 'Action'
25 Width = 240
26 end
27 item
28 Caption = 'Window'
29 Width = 240
30 end
31 item
32 Caption = 'Shortcut'
33 Width = 199
34 end>
35 OwnerData = True
36 PopupMenu = PopupMenu1
37 ReadOnly = True
38 RowSelect = True
39 TabOrder = 0
40 ViewStyle = vsReport
41 OnData = ListView1Data
42 OnDblClick = MenuItem1Click
43 OnKeyPress = ListView1KeyPress
44 end
45 object ButtonClose: TButton
46 Left = 581
47 Height = 37
48 Top = 284
49 Width = 113
50 Anchors = [akRight, akBottom]
51 Caption = 'Close'
52 ModalResult = 11
53 TabOrder = 1
54 OnClick = ButtonCloseClick
55 end
56 object PopupMenu1: TPopupMenu
57 Left = 408
58 Top = 144
59 object MenuItem1: TMenuItem
60 Caption = 'Execute'
61 OnClick = MenuItem1Click
62 end
63 end
64 object ListViewSort1: TListViewSort
65 ListView = ListView1
66 OnCompareItem = ListViewSort1CompareItem
67 Column = 0
68 Order = soNone
69 Left = 221
70 Top = 144
71 end
72end
Note: See TracBrowser for help on using the repository browser.