source: trunk/Forms/FormCheck.lfm

Last change on this file was 227, checked in by chronos, 44 hours ago
  • Modified: Do not reference global Core object if possible.
File size: 5.7 KB
Line 
1object 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
246end
Note: See TracBrowser for help on using the repository browser.