1 | object FormCheck: TFormCheck
|
---|
2 | Left = 483
|
---|
3 | Height = 762
|
---|
4 | Top = 257
|
---|
5 | Width = 1069
|
---|
6 | Caption = 'Check document'
|
---|
7 | ClientHeight = 762
|
---|
8 | ClientWidth = 1069
|
---|
9 | DesignTimePPI = 144
|
---|
10 | OnCreate = FormCreate
|
---|
11 | OnDestroy = FormDestroy
|
---|
12 | OnShow = FormShow
|
---|
13 | LCLVersion = '3.6.0.0'
|
---|
14 | object Panel1: TPanel
|
---|
15 | Left = 0
|
---|
16 | Height = 762
|
---|
17 | Top = 0
|
---|
18 | Width = 269
|
---|
19 | Align = alLeft
|
---|
20 | BevelOuter = bvNone
|
---|
21 | ClientHeight = 762
|
---|
22 | ClientWidth = 269
|
---|
23 | TabOrder = 0
|
---|
24 | object ButtonCheck: TButton
|
---|
25 | Left = 13
|
---|
26 | Height = 38
|
---|
27 | Top = 16
|
---|
28 | Width = 113
|
---|
29 | Caption = 'Check'
|
---|
30 | TabOrder = 0
|
---|
31 | OnClick = ButtonCheckClick
|
---|
32 | end
|
---|
33 | object GroupBox1: TGroupBox
|
---|
34 | Left = 13
|
---|
35 | Height = 260
|
---|
36 | Top = 239
|
---|
37 | Width = 248
|
---|
38 | Anchors = [akTop, akLeft, akRight]
|
---|
39 | Caption = 'Summary section'
|
---|
40 | ClientHeight = 233
|
---|
41 | ClientWidth = 246
|
---|
42 | TabOrder = 1
|
---|
43 | object ButtonAcronymsSummary: TButton
|
---|
44 | Left = 7
|
---|
45 | Height = 38
|
---|
46 | Top = 10
|
---|
47 | Width = 180
|
---|
48 | Caption = 'Acronyms'
|
---|
49 | TabOrder = 0
|
---|
50 | OnClick = ButtonAcronymsSummaryClick
|
---|
51 | end
|
---|
52 | object LabelAcronymCountSummary: TLabel
|
---|
53 | Left = 7
|
---|
54 | Height = 26
|
---|
55 | Top = 58
|
---|
56 | Width = 134
|
---|
57 | Caption = 'Acronym count:'
|
---|
58 | ParentColor = False
|
---|
59 | end
|
---|
60 | object Label1: TLabel
|
---|
61 | Left = 10
|
---|
62 | Height = 26
|
---|
63 | Top = 86
|
---|
64 | Width = 98
|
---|
65 | Caption = 'Start string:'
|
---|
66 | ParentColor = False
|
---|
67 | end
|
---|
68 | object EditSummaryStart: TEdit
|
---|
69 | Left = 10
|
---|
70 | Height = 43
|
---|
71 | Top = 115
|
---|
72 | Width = 224
|
---|
73 | Anchors = [akTop, akLeft, akRight]
|
---|
74 | TabOrder = 1
|
---|
75 | end
|
---|
76 | object Label2: TLabel
|
---|
77 | Left = 10
|
---|
78 | Height = 26
|
---|
79 | Top = 154
|
---|
80 | Width = 91
|
---|
81 | Caption = 'End string:'
|
---|
82 | ParentColor = False
|
---|
83 | end
|
---|
84 | object EditSummaryEnd: TEdit
|
---|
85 | Left = 10
|
---|
86 | Height = 43
|
---|
87 | Top = 182
|
---|
88 | Width = 224
|
---|
89 | Anchors = [akTop, akLeft, akRight]
|
---|
90 | TabOrder = 2
|
---|
91 | end
|
---|
92 | end
|
---|
93 | object GroupBox2: TGroupBox
|
---|
94 | Left = 13
|
---|
95 | Height = 119
|
---|
96 | Top = 115
|
---|
97 | Width = 249
|
---|
98 | Anchors = [akTop, akLeft, akRight]
|
---|
99 | Caption = 'Content'
|
---|
100 | ClientHeight = 92
|
---|
101 | ClientWidth = 247
|
---|
102 | TabOrder = 2
|
---|
103 | object ButtonAcronymsContent: TButton
|
---|
104 | Left = 10
|
---|
105 | Height = 38
|
---|
106 | Top = 0
|
---|
107 | Width = 180
|
---|
108 | Caption = 'Acronyms'
|
---|
109 | TabOrder = 0
|
---|
110 | OnClick = ButtonAcronymsContentClick
|
---|
111 | end
|
---|
112 | object LabelAcronymCountContent: TLabel
|
---|
113 | Left = 10
|
---|
114 | Height = 26
|
---|
115 | Top = 48
|
---|
116 | Width = 134
|
---|
117 | Caption = 'Acronym count:'
|
---|
118 | ParentColor = False
|
---|
119 | end
|
---|
120 | end
|
---|
121 | object ButtonLoadFromFile: TButton
|
---|
122 | Left = 13
|
---|
123 | Height = 38
|
---|
124 | Top = 58
|
---|
125 | Width = 161
|
---|
126 | Caption = 'Load from file'
|
---|
127 | TabOrder = 3
|
---|
128 | OnClick = ButtonLoadFromFileClick
|
---|
129 | end
|
---|
130 | object CheckBoxCaseSensitive: TCheckBox
|
---|
131 | Left = 13
|
---|
132 | Height = 30
|
---|
133 | Top = 509
|
---|
134 | Width = 251
|
---|
135 | Caption = 'Case sensitive comparison'
|
---|
136 | TabOrder = 4
|
---|
137 | end
|
---|
138 | end
|
---|
139 | object Splitter1: TSplitter
|
---|
140 | Left = 269
|
---|
141 | Height = 762
|
---|
142 | Top = 0
|
---|
143 | Width = 7
|
---|
144 | end
|
---|
145 | object Panel2: TPanel
|
---|
146 | Left = 276
|
---|
147 | Height = 762
|
---|
148 | Top = 0
|
---|
149 | Width = 793
|
---|
150 | Align = alClient
|
---|
151 | BevelOuter = bvNone
|
---|
152 | ClientHeight = 762
|
---|
153 | ClientWidth = 793
|
---|
154 | TabOrder = 2
|
---|
155 | object PageControl1: TPageControl
|
---|
156 | Left = 10
|
---|
157 | Height = 742
|
---|
158 | Top = 10
|
---|
159 | Width = 773
|
---|
160 | ActivePage = TabSheetReport
|
---|
161 | Align = alClient
|
---|
162 | BorderSpacing.Around = 10
|
---|
163 | TabIndex = 1
|
---|
164 | TabOrder = 0
|
---|
165 | object TabSheetSource: TTabSheet
|
---|
166 | Caption = 'Source'
|
---|
167 | ClientHeight = 702
|
---|
168 | ClientWidth = 763
|
---|
169 | object MemoDocument: TMemo
|
---|
170 | Left = 10
|
---|
171 | Height = 682
|
---|
172 | Top = 10
|
---|
173 | Width = 742
|
---|
174 | Anchors = [akTop, akLeft, akRight, akBottom]
|
---|
175 | ScrollBars = ssAutoBoth
|
---|
176 | TabOrder = 0
|
---|
177 | WordWrap = False
|
---|
178 | end
|
---|
179 | end
|
---|
180 | object TabSheetReport: TTabSheet
|
---|
181 | Caption = 'Report'
|
---|
182 | ClientHeight = 702
|
---|
183 | ClientWidth = 763
|
---|
184 | object ListViewReport: TListView
|
---|
185 | Left = 8
|
---|
186 | Height = 675
|
---|
187 | Top = 16
|
---|
188 | Width = 749
|
---|
189 | Anchors = [akTop, akLeft, akRight, akBottom]
|
---|
190 | Columns = <
|
---|
191 | item
|
---|
192 | Caption = 'Position'
|
---|
193 | Width = 96
|
---|
194 | end
|
---|
195 | item
|
---|
196 | Caption = 'Type'
|
---|
197 | Width = 120
|
---|
198 | end
|
---|
199 | item
|
---|
200 | Caption = 'Message'
|
---|
201 | Width = 960
|
---|
202 | end>
|
---|
203 | OwnerData = True
|
---|
204 | PopupMenu = PopupMenuReport
|
---|
205 | ReadOnly = True
|
---|
206 | RowSelect = True
|
---|
207 | TabOrder = 0
|
---|
208 | ViewStyle = vsReport
|
---|
209 | OnData = ListViewReportData
|
---|
210 | end
|
---|
211 | end
|
---|
212 | end
|
---|
213 | end
|
---|
214 | object OpenDialog1: TOpenDialog
|
---|
215 | DefaultExt = '.txt'
|
---|
216 | Filter = 'Text files (.txt)|*.txt|Any file|*.*'
|
---|
217 | Left = 653
|
---|
218 | Top = 346
|
---|
219 | end
|
---|
220 | object PopupMenuReport: TPopupMenu
|
---|
221 | Left = 451
|
---|
222 | Top = 242
|
---|
223 | object MenuItemGoTo: TMenuItem
|
---|
224 | Action = AGoToLocation
|
---|
225 | end
|
---|
226 | object MenuItem1: TMenuItem
|
---|
227 | Action = ASaveToCsv
|
---|
228 | end
|
---|
229 | end
|
---|
230 | object ActionList1: TActionList
|
---|
231 | Left = 655
|
---|
232 | Top = 244
|
---|
233 | object ASaveToCsv: TAction
|
---|
234 | Caption = 'Save to CSV...'
|
---|
235 | OnExecute = ASaveToCsvExecute
|
---|
236 | end
|
---|
237 | object AGoToLocation: TAction
|
---|
238 | Caption = 'Go to location'
|
---|
239 | OnExecute = AGoToLocationExecute
|
---|
240 | end
|
---|
241 | end
|
---|
242 | object SaveDialog1: TSaveDialog
|
---|
243 | Left = 454
|
---|
244 | Top = 346
|
---|
245 | end
|
---|
246 | end
|
---|