-
Notifications
You must be signed in to change notification settings - Fork 5
Expand file tree
/
Copy pathjsonV1.dfm
More file actions
146 lines (146 loc) · 3.33 KB
/
jsonV1.dfm
File metadata and controls
146 lines (146 loc) · 3.33 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
object frmJsonViewer: TfrmJsonViewer
Left = 192
Top = 124
Width = 1088
Height = 563
Caption = 'jsonV'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Tahoma'
Font.Style = []
OldCreateOrder = True
Position = poDefault
PixelsPerInch = 96
TextHeight = 16
object TreeView1: TTreeView
Left = 0
Top = 0
Width = 1072
Height = 488
Align = alClient
HideSelection = False
Indent = 19
ReadOnly = True
TabOrder = 0
ToolTips = False
OnChange = TreeView1Change
OnCreateNodeClass = TreeView1CreateNodeClass
OnDblClick = TreeView1DblClick
OnExpanding = TreeView1Expanding
end
object panSearch: TPanel
Left = 0
Top = 488
Width = 1072
Height = 36
Align = alBottom
BevelOuter = bvNone
TabOrder = 1
Visible = False
object Label1: TLabel
Left = 8
Top = 7
Width = 29
Height = 16
Caption = '&Find:'
end
object lblSearchResult: TLabel
Left = 352
Top = 8
Width = 12
Height = 16
Caption = '...'
end
object txtFind: TEdit
Left = 37
Top = 6
Width = 249
Height = 24
TabOrder = 0
OnChange = txtFindChange
OnKeyPress = txtFindKeyPress
end
object btnFindPrev: TButton
Left = 292
Top = 4
Width = 25
Height = 25
Caption = '<'
TabOrder = 1
OnClick = actSearchPrevExecute
end
object btnFindNext: TButton
Left = 320
Top = 4
Width = 25
Height = 25
Caption = '>'
TabOrder = 2
OnClick = actSearchNextExecute
end
end
object ActionList1: TActionList
Left = 40
Top = 24
object actEditCopy: TEditCopy
Category = 'Edit'
Caption = '&Copy'
Hint = 'Copy|Copies the selection and puts it on the Clipboard'
ImageIndex = 1
ShortCut = 16451
OnExecute = actEditCopyExecute
end
object actEditCopyValue: TAction
Category = 'Edit'
Caption = 'Copy &value'
Hint = 'Copy value|Copies the value only to the clipboard'
ShortCut = 24643
OnExecute = actEditCopyValueExecute
end
object actFind: TAction
Category = 'Search'
Caption = 'Find...'
ShortCut = 16454
OnExecute = actFindExecute
end
object actSearchPrev: TAction
Category = 'Search'
Caption = 'Search Previous'
ShortCut = 8306
OnExecute = actSearchPrevExecute
end
object actSearchNext: TAction
Category = 'Search'
Caption = 'Search Next'
ShortCut = 114
OnExecute = actSearchNextExecute
end
object actSortChildren: TAction
Category = 'Search'
Caption = 'Sort Children'
ShortCut = 16466
OnExecute = actSortChildrenExecute
end
object actViewTabular: TAction
Category = 'View'
Caption = 'View as table...'
ShortCut = 16468
OnExecute = actViewTabularExecute
end
object actCopyKey: TAction
Category = 'Edit'
Caption = 'Copy &key'
Hint = 'Copy key|Copies the key name to the clipboard'
ShortCut = 16459
OnExecute = actCopyKeyExecute
end
object actViewSortChildren: TAction
Category = 'View'
Caption = 'Sort children'
ShortCut = 16467
OnExecute = actViewSortChildrenExecute
end
end
end