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.