| Line | |
|---|
| 1 | object FormFindDuplicity: TFormFindDuplicity
|
|---|
| 2 | Left = 455
|
|---|
| 3 | Height = 523
|
|---|
| 4 | Top = 355
|
|---|
| 5 | Width = 807
|
|---|
| 6 | Caption = 'Find duplicities'
|
|---|
| 7 | ClientHeight = 523
|
|---|
| 8 | ClientWidth = 807
|
|---|
| 9 | DesignTimePPI = 144
|
|---|
| 10 | OnCreate = FormCreate
|
|---|
| 11 | OnDestroy = FormDestroy
|
|---|
| 12 | OnShow = FormShow
|
|---|
| 13 | LCLVersion = '2.2.6.0'
|
|---|
| 14 | object ListView1: TListView
|
|---|
| 15 | Left = 5
|
|---|
| 16 | Height = 455
|
|---|
| 17 | Top = 63
|
|---|
| 18 | Width = 797
|
|---|
| 19 | Align = alClient
|
|---|
| 20 | BorderSpacing.Around = 5
|
|---|
| 21 | Columns = <
|
|---|
| 22 | item
|
|---|
| 23 | Caption = 'Field'
|
|---|
| 24 | Width = 180
|
|---|
| 25 | end
|
|---|
| 26 | item
|
|---|
| 27 | Caption = 'Contacts'
|
|---|
| 28 | Width = 360
|
|---|
| 29 | end
|
|---|
| 30 | item
|
|---|
| 31 | Caption = 'Count'
|
|---|
| 32 | Width = 243
|
|---|
| 33 | end>
|
|---|
| 34 | OwnerData = True
|
|---|
| 35 | ParentFont = False
|
|---|
| 36 | PopupMenu = PopupMenu1
|
|---|
| 37 | ReadOnly = True
|
|---|
| 38 | RowSelect = True
|
|---|
| 39 | TabOrder = 0
|
|---|
| 40 | ViewStyle = vsReport
|
|---|
| 41 | OnData = ListView1Data
|
|---|
| 42 | OnDblClick = AShowContactsExecute
|
|---|
| 43 | end
|
|---|
| 44 | object Panel1: TPanel
|
|---|
| 45 | Left = 0
|
|---|
| 46 | Height = 58
|
|---|
| 47 | Top = 0
|
|---|
| 48 | Width = 807
|
|---|
| 49 | Align = alTop
|
|---|
| 50 | BevelOuter = bvNone
|
|---|
| 51 | ClientHeight = 58
|
|---|
| 52 | ClientWidth = 807
|
|---|
| 53 | ParentFont = False
|
|---|
| 54 | TabOrder = 1
|
|---|
| 55 | object ComboBoxField: TComboBox
|
|---|
| 56 | Left = 232
|
|---|
| 57 | Height = 42
|
|---|
| 58 | Top = 16
|
|---|
| 59 | Width = 326
|
|---|
| 60 | ItemHeight = 0
|
|---|
| 61 | OnChange = ComboBoxFieldChange
|
|---|
| 62 | ParentFont = False
|
|---|
| 63 | Style = csDropDownList
|
|---|
| 64 | TabOrder = 0
|
|---|
| 65 | end
|
|---|
| 66 | object Label1: TLabel
|
|---|
| 67 | Left = 13
|
|---|
| 68 | Height = 26
|
|---|
| 69 | Top = 19
|
|---|
| 70 | Width = 135
|
|---|
| 71 | Caption = 'By contact field:'
|
|---|
| 72 | ParentColor = False
|
|---|
| 73 | ParentFont = False
|
|---|
| 74 | end
|
|---|
| 75 | object ButtonMerge: TButton
|
|---|
| 76 | Left = 568
|
|---|
| 77 | Height = 38
|
|---|
| 78 | Top = 16
|
|---|
| 79 | Width = 113
|
|---|
| 80 | Caption = 'Merge'
|
|---|
| 81 | OnClick = ButtonMergeClick
|
|---|
| 82 | TabOrder = 1
|
|---|
| 83 | end
|
|---|
| 84 | end
|
|---|
| 85 | object ActionList1: TActionList
|
|---|
| 86 | Left = 262
|
|---|
| 87 | Top = 154
|
|---|
| 88 | object AShowContacts: TAction
|
|---|
| 89 | Caption = 'Show contacts'
|
|---|
| 90 | OnExecute = AShowContactsExecute
|
|---|
| 91 | end
|
|---|
| 92 | end
|
|---|
| 93 | object PopupMenu1: TPopupMenu
|
|---|
| 94 | Left = 90
|
|---|
| 95 | Top = 149
|
|---|
| 96 | object MenuItem1: TMenuItem
|
|---|
| 97 | Action = AShowContacts
|
|---|
| 98 | end
|
|---|
| 99 | end
|
|---|
| 100 | end
|
|---|
Note:
See
TracBrowser
for help on using the repository browser.