|
Last change
on this file was 219, checked in by chronos, 9 months 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 | |
|---|
| 1 | object 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
|
|---|
| 72 | end
|
|---|
Note:
See
TracBrowser
for help on using the repository browser.
