source: trunk/unittests/CmdLineParameterUnitTests.pas@ 224

Last change on this file since 224 was 224, checked in by RBRi, 18 years ago

% refactoring
File size: 100.2 KB
Line 
1Unit CmdLineParameterUnitTests;
2
3// NewView - a new OS/2 Help Viewer
4// Copyright 2006-2007 Ronald Brill (rbri at rbri dot de)
5// This software is released under the GNU Public License - see readme.txt
6
7// UnitTests for CmdLineParameterUnit
8
9Interface
10
11uses
12 Classes,
13 TestAssert,
14 CmdLineParameterUnit;
15
16 FUNCTION getCmdLineParameterUnitTests : TList;
17
18
19Implementation
20
21 PROCEDURE testParseCmdLine_Empty;
22 VAR
23 tmpCmdLineString : String;
24 tmpCmdLineParameters : TCmdLineParameters;
25 BEGIN
26 tmpCmdLineString := '';
27 tmpCmdLineParameters := TCmdLineParameters.Create;
28 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
29
30 assertFalse('testParseCmdLine_Empty', tmpCmdLineParameters.getShowUsageFlag);
31 assertFalse('testParseCmdLine_Empty', tmpCmdLineParameters.getSearchFlag);
32 assertFalse('testParseCmdLine_Empty', tmpCmdLineParameters.getGlobalSearchFlag);
33 assertEqualsString('testParseCmdLine_Empty', '', tmpCmdLineParameters.getLanguage);
34 assertFalse('testParseCmdLine_Empty', tmpCmdLineParameters.getHelpManagerFlag);
35 assertEqualsInt('testParseCmdLine_Empty', 0, tmpCmdLineParameters.getHelpManagerWindow);
36 assertEqualsInt('testParseCmdLine_Empty', 0, tmpCmdLineParameters.getOwnerWindow);
37 assertEqualsString('testParseCmdLine_Empty', '', tmpCmdLineParameters.getWindowTitle);
38 assertEqualsString('testParseCmdLine_Empty', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
39 assertEqualsString('testParseCmdLine_Empty', '', tmpCmdLineParameters.getFileNames(false));
40 assertEqualsString('testParseCmdLine_Empty', '', tmpCmdLineParameters.getSearchText);
41 END;
42
43
44 PROCEDURE testParseCmdLine_QuestionMark;
45 VAR
46 tmpCmdLineString : String;
47 tmpCmdLineParameters : TCmdLineParameters;
48 BEGIN
49 tmpCmdLineString := '-?';
50 tmpCmdLineParameters := TCmdLineParameters.Create;
51 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
52
53 assertTrue('testParseCmdLine_QuestionMark', tmpCmdLineParameters.getShowUsageFlag);
54 assertFalse('testParseCmdLine_QuestionMark', tmpCmdLineParameters.getSearchFlag);
55 assertFalse('testParseCmdLine_QuestionMark', tmpCmdLineParameters.getGlobalSearchFlag);
56 assertEqualsString('testParseCmdLine_QuestionMark', '', tmpCmdLineParameters.getLanguage);
57 assertFalse('testParseCmdLine_QuestionMark', tmpCmdLineParameters.getHelpManagerFlag);
58 assertEqualsInt('testParseCmdLine_QuestionMark', 0, tmpCmdLineParameters.getHelpManagerWindow);
59 assertEqualsInt('testParseCmdLine_QuestionMark', 0, tmpCmdLineParameters.getOwnerWindow);
60 assertEqualsString('testParseCmdLine_QuestionMark', '', tmpCmdLineParameters.getWindowTitle);
61 assertEqualsString('testParseCmdLine_QuestionMark', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
62 assertEqualsString('testParseCmdLine_QuestionMark', '', tmpCmdLineParameters.getFileNames(false));
63 assertEqualsString('testParseCmdLine_QuestionMark', '', tmpCmdLineParameters.getSearchText);
64 END;
65
66
67 PROCEDURE testParseCmdLine_QuotedQuestionMark;
68 VAR
69 tmpCmdLineString : String;
70 tmpCmdLineParameters : TCmdLineParameters;
71 BEGIN
72 tmpCmdLineString := '"-?"';
73 tmpCmdLineParameters := TCmdLineParameters.Create;
74 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
75
76 assertTrue('testParseCmdLine_QuotedQuestionMark', tmpCmdLineParameters.getShowUsageFlag);
77 assertFalse('testParseCmdLine_QuotedQuestionMark', tmpCmdLineParameters.getSearchFlag);
78 assertFalse('testParseCmdLine_QuotedQuestionMark', tmpCmdLineParameters.getGlobalSearchFlag);
79 assertEqualsString('testParseCmdLine_QuotedQuestionMark', '', tmpCmdLineParameters.getLanguage);
80 assertFalse('testParseCmdLine_QuotedQuestionMark', tmpCmdLineParameters.getHelpManagerFlag);
81 assertEqualsInt('testParseCmdLine_QuotedQuestionMark', 0, tmpCmdLineParameters.getHelpManagerWindow);
82 assertEqualsInt('testParseCmdLine_QuotedQuestionMark', 0, tmpCmdLineParameters.getOwnerWindow);
83 assertEqualsString('testParseCmdLine_QuotedQuestionMark', '', tmpCmdLineParameters.getWindowTitle);
84 assertEqualsString('testParseCmdLine_QuotedQuestionMark', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
85 assertEqualsString('testParseCmdLine_QuotedQuestionMark', '', tmpCmdLineParameters.getFileNames(false));
86 assertEqualsString('testParseCmdLine_QuotedQuestionMark', '', tmpCmdLineParameters.getSearchText);
87 END;
88
89
90 PROCEDURE testParseCmdLine_lowerH;
91 VAR
92 tmpCmdLineString : String;
93 tmpCmdLineParameters : TCmdLineParameters;
94 BEGIN
95 tmpCmdLineString := '-h';
96 tmpCmdLineParameters := TCmdLineParameters.Create;
97 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
98
99 assertTrue('testParseCmdLine_lowerH', tmpCmdLineParameters.getShowUsageFlag);
100 assertFalse('testParseCmdLine_lowerH', tmpCmdLineParameters.getSearchFlag);
101 assertFalse('testParseCmdLine_lowerH', tmpCmdLineParameters.getGlobalSearchFlag);
102 assertEqualsString('testParseCmdLine_lowerH', '', tmpCmdLineParameters.getLanguage);
103 assertFalse('testParseCmdLine_lowerH', tmpCmdLineParameters.getHelpManagerFlag);
104 assertEqualsInt('testParseCmdLine_lowerH', 0, tmpCmdLineParameters.getHelpManagerWindow);
105 assertEqualsInt('testParseCmdLine_lowerH', 0, tmpCmdLineParameters.getOwnerWindow);
106 assertEqualsString('testParseCmdLine_lowerH', '', tmpCmdLineParameters.getWindowTitle);
107 assertEqualsString('testParseCmdLine_lowerH', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
108 assertEqualsString('testParseCmdLine_lowerH', '', tmpCmdLineParameters.getFileNames(false));
109 assertEqualsString('testParseCmdLine_lowerH', '', tmpCmdLineParameters.getSearchText);
110 END;
111
112
113 PROCEDURE testParseCmdLine_upperH;
114 VAR
115 tmpCmdLineString : String;
116 tmpCmdLineParameters : TCmdLineParameters;
117 BEGIN
118 tmpCmdLineString := '-H';
119 tmpCmdLineParameters := TCmdLineParameters.Create;
120 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
121
122 assertTrue('testParseCmdLine_upperH', tmpCmdLineParameters.getShowUsageFlag);
123 assertFalse('testParseCmdLine_upperH', tmpCmdLineParameters.getSearchFlag);
124 assertFalse('testParseCmdLine_upperH', tmpCmdLineParameters.getGlobalSearchFlag);
125 assertEqualsString('testParseCmdLine_upperH', '', tmpCmdLineParameters.getLanguage);
126 assertFalse('testParseCmdLine_upperH', tmpCmdLineParameters.getHelpManagerFlag);
127 assertEqualsInt('testParseCmdLine_upperH', 0, tmpCmdLineParameters.getHelpManagerWindow);
128 assertEqualsInt('testParseCmdLine_upperH', 0, tmpCmdLineParameters.getOwnerWindow);
129 assertEqualsString('testParseCmdLine_upperH', '', tmpCmdLineParameters.getWindowTitle);
130 assertEqualsString('testParseCmdLine_upperH', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
131 assertEqualsString('testParseCmdLine_upperH', '', tmpCmdLineParameters.getFileNames(false));
132 assertEqualsString('testParseCmdLine_upperH', '', tmpCmdLineParameters.getSearchText);
133 END;
134
135
136 PROCEDURE testParseCmdLine_lowerHelp;
137 VAR
138 tmpCmdLineString : String;
139 tmpCmdLineParameters : TCmdLineParameters;
140 BEGIN
141 tmpCmdLineString := '-help';
142 tmpCmdLineParameters := TCmdLineParameters.Create;
143 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
144
145 assertTrue('testParseCmdLine_lowerHelp', tmpCmdLineParameters.getShowUsageFlag);
146 assertFalse('testParseCmdLine_lowerHelp', tmpCmdLineParameters.getSearchFlag);
147 assertFalse('testParseCmdLine_lowerHelp', tmpCmdLineParameters.getGlobalSearchFlag);
148 assertEqualsString('testParseCmdLine_lowerHelp', '', tmpCmdLineParameters.getLanguage);
149 assertFalse('testParseCmdLine_lowerHelp', tmpCmdLineParameters.getHelpManagerFlag);
150 assertEqualsInt('testParseCmdLine_lowerHelp', 0, tmpCmdLineParameters.getHelpManagerWindow);
151 assertEqualsInt('testParseCmdLine_lowerHelp', 0, tmpCmdLineParameters.getOwnerWindow);
152 assertEqualsString('testParseCmdLine_lowerHelp', '', tmpCmdLineParameters.getWindowTitle);
153 assertEqualsString('testParseCmdLine_lowerHelp', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
154 assertEqualsString('testParseCmdLine_lowerHelp', '', tmpCmdLineParameters.getFileNames(false));
155 assertEqualsString('testParseCmdLine_lowerHelp', '', tmpCmdLineParameters.getSearchText);
156 END;
157
158
159 PROCEDURE testParseCmdLine_upperHELP;
160 VAR
161 tmpCmdLineString : String;
162 tmpCmdLineParameters : TCmdLineParameters;
163 BEGIN
164 tmpCmdLineString := '-HELP';
165 tmpCmdLineParameters := TCmdLineParameters.Create;
166 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
167
168 assertTrue('testParseCmdLine_upperHELP', tmpCmdLineParameters.getShowUsageFlag);
169 assertFalse('testParseCmdLine_upperHELP', tmpCmdLineParameters.getSearchFlag);
170 assertFalse('testParseCmdLine_upperHELP', tmpCmdLineParameters.getGlobalSearchFlag);
171 assertEqualsString('testParseCmdLine_upperHELP', '', tmpCmdLineParameters.getLanguage);
172 assertFalse('testParseCmdLine_upperHELP', tmpCmdLineParameters.getHelpManagerFlag);
173 assertEqualsInt('testParseCmdLine_upperHELP', 0, tmpCmdLineParameters.getHelpManagerWindow);
174 assertEqualsInt('testParseCmdLine_upperHELP', 0, tmpCmdLineParameters.getOwnerWindow);
175 assertEqualsString('testParseCmdLine_upperHELP', '', tmpCmdLineParameters.getWindowTitle);
176 assertEqualsString('testParseCmdLine_upperHELP', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
177 assertEqualsString('testParseCmdLine_upperHELP', '', tmpCmdLineParameters.getFileNames(false));
178 assertEqualsString('testParseCmdLine_upperHELP', '', tmpCmdLineParameters.getSearchText);
179 END;
180
181
182 PROCEDURE testParseCmdLine_upperHE;
183 VAR
184 tmpCmdLineString : String;
185 tmpCmdLineParameters : TCmdLineParameters;
186 BEGIN
187 tmpCmdLineString := '-He';
188 tmpCmdLineParameters := TCmdLineParameters.Create;
189 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
190
191 assertTrue('testParseCmdLine_upperHE', tmpCmdLineParameters.getShowUsageFlag);
192 assertFalse('testParseCmdLine_upperHE', tmpCmdLineParameters.getSearchFlag);
193 assertFalse('testParseCmdLine_upperHELP', tmpCmdLineParameters.getGlobalSearchFlag);
194 assertEqualsString('testParseCmdLine_upperHE', '', tmpCmdLineParameters.getLanguage);
195 assertFalse('testParseCmdLine_upperHE', tmpCmdLineParameters.getHelpManagerFlag);
196 assertEqualsInt('testParseCmdLine_upperHE', 0, tmpCmdLineParameters.getHelpManagerWindow);
197 assertEqualsInt('testParseCmdLine_upperHE', 0, tmpCmdLineParameters.getOwnerWindow);
198 assertEqualsString('testParseCmdLine_upperHE', '', tmpCmdLineParameters.getWindowTitle);
199 assertEqualsString('testParseCmdLine_upperHE', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
200 assertEqualsString('testParseCmdLine_upperHE', '', tmpCmdLineParameters.getFileNames(false));
201 assertEqualsString('testParseCmdLine_upperHE', '', tmpCmdLineParameters.getSearchText);
202 END;
203
204
205 PROCEDURE testParseCmdLine_h_between;
206 VAR
207 tmpCmdLineString : String;
208 tmpCmdLineParameters : TCmdLineParameters;
209 BEGIN
210 tmpCmdLineString := '-s-h-title';
211 tmpCmdLineParameters := TCmdLineParameters.Create;
212 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
213
214 assertTrue('testParseCmdLine_h_between', tmpCmdLineParameters.getShowUsageFlag);
215 assertTrue('testParseCmdLine_h_between', tmpCmdLineParameters.getSearchFlag);
216 assertFalse('testParseCmdLine_h_between', tmpCmdLineParameters.getGlobalSearchFlag);
217 assertEqualsString('testParseCmdLine_h_between', '', tmpCmdLineParameters.getLanguage);
218 assertFalse('testParseCmdLine_h_between', tmpCmdLineParameters.getHelpManagerFlag);
219 assertEqualsInt('testParseCmdLine_h_between', 0, tmpCmdLineParameters.getHelpManagerWindow);
220 assertEqualsInt('testParseCmdLine_h_between', 0, tmpCmdLineParameters.getOwnerWindow);
221 assertEqualsString('testParseCmdLine_h_between', '', tmpCmdLineParameters.getWindowTitle);
222 assertEqualsString('testParseCmdLine_h_between', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
223 assertEqualsString('testParseCmdLine_h_between', '', tmpCmdLineParameters.getFileNames(false));
224 assertEqualsString('testParseCmdLine_h_between', '', tmpCmdLineParameters.getSearchText);
225 END;
226
227
228 PROCEDURE testParseCmdLine_h_between_withSpace;
229 VAR
230 tmpCmdLineString : String;
231 tmpCmdLineParameters : TCmdLineParameters;
232 BEGIN
233 tmpCmdLineString := '-s -h -title';
234 tmpCmdLineParameters := TCmdLineParameters.Create;
235 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
236
237 assertTrue('testParseCmdLine_h_between_withSpace', tmpCmdLineParameters.getShowUsageFlag);
238 assertTrue('testParseCmdLine_h_between_withSpace', tmpCmdLineParameters.getSearchFlag);
239 assertFalse('testParseCmdLine_h_between_withSpace', tmpCmdLineParameters.getGlobalSearchFlag);
240 assertEqualsString('testParseCmdLine_h_between_withSpace', '', tmpCmdLineParameters.getLanguage);
241 assertFalse('testParseCmdLine_h_between_withSpace', tmpCmdLineParameters.getHelpManagerFlag);
242 assertEqualsInt('testParseCmdLine_h_between_withSpace', 0, tmpCmdLineParameters.getHelpManagerWindow);
243 assertEqualsInt('testParseCmdLine_h_between_withSpace', 0, tmpCmdLineParameters.getOwnerWindow);
244 assertEqualsString('testParseCmdLine_h_between_withSpace', '', tmpCmdLineParameters.getWindowTitle);
245 assertEqualsString('testParseCmdLine_h_between_withSpace', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
246 assertEqualsString('testParseCmdLine_h_between_withSpace', '', tmpCmdLineParameters.getFileNames(false));
247 assertEqualsString('testParseCmdLine_h_between_withSpace', '', tmpCmdLineParameters.getSearchText);
248 END;
249
250
251 PROCEDURE testParseCmdLine_lowerS;
252 VAR
253 tmpCmdLineString : String;
254 tmpCmdLineParameters : TCmdLineParameters;
255 BEGIN
256 tmpCmdLineString := '-s file search';
257 tmpCmdLineParameters := TCmdLineParameters.Create;
258 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
259
260 assertFalse('testParseCmdLine_lowerS', tmpCmdLineParameters.getShowUsageFlag);
261 assertTrue('testParseCmdLine_lowerS', tmpCmdLineParameters.getSearchFlag);
262 assertFalse('testParseCmdLine_lowerS', tmpCmdLineParameters.getGlobalSearchFlag);
263 assertEqualsString('testParseCmdLine_lowerS', '', tmpCmdLineParameters.getLanguage);
264 assertFalse('testParseCmdLine_lowerS', tmpCmdLineParameters.getHelpManagerFlag);
265 assertEqualsInt('testParseCmdLine_lowerS', 0, tmpCmdLineParameters.getHelpManagerWindow);
266 assertEqualsInt('testParseCmdLine_lowerS', 0, tmpCmdLineParameters.getOwnerWindow);
267 assertEqualsString('testParseCmdLine_lowerS', '', tmpCmdLineParameters.getWindowTitle);
268 assertEqualsString('testParseCmdLine_lowerS', 'file', tmpCmdLineParameters.getFileNames(true));
269 assertEqualsString('testParseCmdLine_lowerS', 'file', tmpCmdLineParameters.getFileNames(false));
270 assertEqualsString('testParseCmdLine_lowerS', 'search', tmpCmdLineParameters.getSearchText);
271 END;
272
273
274 PROCEDURE testParseCmdLine_upperS;
275 VAR
276 tmpCmdLineString : String;
277 tmpCmdLineParameters : TCmdLineParameters;
278 BEGIN
279 tmpCmdLineString := '-S file seArch';
280 tmpCmdLineParameters := TCmdLineParameters.Create;
281 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
282
283 assertFalse('testParseCmdLine_upperS', tmpCmdLineParameters.getShowUsageFlag);
284 assertTrue('testParseCmdLine_upperS', tmpCmdLineParameters.getSearchFlag);
285 assertFalse('testParseCmdLine_upperS', tmpCmdLineParameters.getGlobalSearchFlag);
286 assertEqualsString('testParseCmdLine_upperS', '', tmpCmdLineParameters.getLanguage);
287 assertFalse('testParseCmdLine_upperS', tmpCmdLineParameters.getHelpManagerFlag);
288 assertEqualsInt('testParseCmdLine_upperS', 0, tmpCmdLineParameters.getHelpManagerWindow);
289 assertEqualsInt('testParseCmdLine_upperS', 0, tmpCmdLineParameters.getOwnerWindow);
290 assertEqualsString('testParseCmdLine_upperS', '', tmpCmdLineParameters.getWindowTitle);
291 assertEqualsString('testParseCmdLine_upperS', 'file', tmpCmdLineParameters.getFileNames(true));
292 assertEqualsString('testParseCmdLine_upperS', 'file', tmpCmdLineParameters.getFileNames(false));
293 assertEqualsString('testParseCmdLine_upperS', 'seArch', tmpCmdLineParameters.getSearchText);
294 END;
295
296
297
298 PROCEDURE testParseCmdLine_upperS_withBlank;
299 VAR
300 tmpCmdLineString : String;
301 tmpCmdLineParameters : TCmdLineParameters;
302 BEGIN
303 tmpCmdLineString := '-S FilE seArch';
304 tmpCmdLineParameters := TCmdLineParameters.Create;
305 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
306
307 assertFalse('testParseCmdLine_upperS_withBlank', tmpCmdLineParameters.getShowUsageFlag);
308 assertTrue('testParseCmdLine_upperS_withBlank', tmpCmdLineParameters.getSearchFlag);
309 assertFalse('testParseCmdLine_upperS_withBlank', tmpCmdLineParameters.getGlobalSearchFlag);
310 assertEqualsString('testParseCmdLine_upperS_withBlank', '', tmpCmdLineParameters.getLanguage);
311 assertFalse('testParseCmdLine_upperS_withBlank', tmpCmdLineParameters.getHelpManagerFlag);
312 assertEqualsInt('testParseCmdLine_upperS_withBlank', 0, tmpCmdLineParameters.getHelpManagerWindow);
313 assertEqualsInt('testParseCmdLine_upperS_withBlank', 0, tmpCmdLineParameters.getOwnerWindow);
314 assertEqualsString('testParseCmdLine_upperS_withBlank', '', tmpCmdLineParameters.getWindowTitle);
315 assertEqualsString('testParseCmdLine_upperS_withBlank', 'FilE', tmpCmdLineParameters.getFileNames(true));
316 assertEqualsString('testParseCmdLine_upperS_withBlank', 'FilE', tmpCmdLineParameters.getFileNames(false));
317 assertEqualsString('testParseCmdLine_upperS_withBlank', 'seArch', tmpCmdLineParameters.getSearchText);
318 END;
319
320
321 PROCEDURE testParseCmdLine_QuotedS;
322 VAR
323 tmpCmdLineString : String;
324 tmpCmdLineParameters : TCmdLineParameters;
325 BEGIN
326 tmpCmdLineString := '"-S" FilE seArch';
327 tmpCmdLineParameters := TCmdLineParameters.Create;
328 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
329
330 assertFalse('testParseCmdLine_QuotedS', tmpCmdLineParameters.getShowUsageFlag);
331 assertTrue('testParseCmdLine_QuotedS', tmpCmdLineParameters.getSearchFlag);
332 assertFalse('testParseCmdLine_QuotedS', tmpCmdLineParameters.getGlobalSearchFlag);
333 assertEqualsString('testParseCmdLine_QuotedS', '', tmpCmdLineParameters.getLanguage);
334 assertFalse('testParseCmdLine_QuotedS', tmpCmdLineParameters.getHelpManagerFlag);
335 assertEqualsInt('testParseCmdLine_QuotedS', 0, tmpCmdLineParameters.getHelpManagerWindow);
336 assertEqualsInt('testParseCmdLine_QuotedS', 0, tmpCmdLineParameters.getOwnerWindow);
337 assertEqualsString('testParseCmdLine_QuotedS', '', tmpCmdLineParameters.getWindowTitle);
338 assertEqualsString('testParseCmdLine_QuotedS', 'FilE', tmpCmdLineParameters.getFileNames(true));
339 assertEqualsString('testParseCmdLine_QuotedS', 'FilE', tmpCmdLineParameters.getFileNames(false));
340 assertEqualsString('testParseCmdLine_QuotedS', 'seArch', tmpCmdLineParameters.getSearchText);
341 END;
342
343
344 PROCEDURE testParseCmdLine_emptyS;
345 VAR
346 tmpCmdLineString : String;
347 tmpCmdLineParameters : TCmdLineParameters;
348 BEGIN
349 tmpCmdLineString := '-S';
350 tmpCmdLineParameters := TCmdLineParameters.Create;
351 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
352
353 assertFalse('testParseCmdLine_emptyS', tmpCmdLineParameters.getShowUsageFlag);
354 assertTrue('testParseCmdLine_emptyS', tmpCmdLineParameters.getSearchFlag);
355 assertFalse('testParseCmdLine_emptyS', tmpCmdLineParameters.getGlobalSearchFlag);
356 assertEqualsString('testParseCmdLine_emptyS', '', tmpCmdLineParameters.getLanguage);
357 assertFalse('testParseCmdLine_emptyS', tmpCmdLineParameters.getHelpManagerFlag);
358 assertEqualsInt('testParseCmdLine_emptyS', 0, tmpCmdLineParameters.getHelpManagerWindow);
359 assertEqualsInt('testParseCmdLine_emptyS', 0, tmpCmdLineParameters.getOwnerWindow);
360 assertEqualsString('testParseCmdLine_emptyS', '', tmpCmdLineParameters.getWindowTitle);
361 assertEqualsString('testParseCmdLine_emptyS', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
362 assertEqualsString('testParseCmdLine_emptyS', '', tmpCmdLineParameters.getFileNames(false));
363 assertEqualsString('testParseCmdLine_emptyS', '', tmpCmdLineParameters.getSearchText);
364 END;
365
366
367 PROCEDURE testParseCmdLine_s_between;
368 VAR
369 tmpCmdLineString : String;
370 tmpCmdLineParameters : TCmdLineParameters;
371 BEGIN
372 tmpCmdLineString := '-h-s-h';
373 tmpCmdLineParameters := TCmdLineParameters.Create;
374 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
375
376 assertTrue('testParseCmdLine_s_between', tmpCmdLineParameters.getShowUsageFlag);
377 assertTrue('testParseCmdLine_s_between', tmpCmdLineParameters.getSearchFlag);
378 assertFalse('testParseCmdLine_s_between', tmpCmdLineParameters.getGlobalSearchFlag);
379 assertEqualsString('testParseCmdLine_emptyS', '', tmpCmdLineParameters.getLanguage);
380 assertFalse('testParseCmdLine_s_between', tmpCmdLineParameters.getHelpManagerFlag);
381 assertEqualsInt('testParseCmdLine_s_between', 0, tmpCmdLineParameters.getHelpManagerWindow);
382 assertEqualsInt('testParseCmdLine_s_between', 0, tmpCmdLineParameters.getOwnerWindow);
383 assertEqualsString('testParseCmdLine_s_between', '', tmpCmdLineParameters.getWindowTitle);
384 assertEqualsString('testParseCmdLine_s_between', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
385 assertEqualsString('testParseCmdLine_s_between', '', tmpCmdLineParameters.getFileNames(false));
386 assertEqualsString('testParseCmdLine_s_between', '', tmpCmdLineParameters.getSearchText);
387 END;
388
389
390 PROCEDURE testParseCmdLine_s_between_withSpace;
391 VAR
392 tmpCmdLineString : String;
393 tmpCmdLineParameters : TCmdLineParameters;
394 BEGIN
395 tmpCmdLineString := '-h -s -h';
396 tmpCmdLineParameters := TCmdLineParameters.Create;
397 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
398
399 assertTrue('testParseCmdLine_s_between_withSpace', tmpCmdLineParameters.getShowUsageFlag);
400 assertTrue('testParseCmdLine_s_between_withSpace', tmpCmdLineParameters.getSearchFlag);
401 assertFalse('testParseCmdLine_s_between_withSpace', tmpCmdLineParameters.getGlobalSearchFlag);
402 assertEqualsString('testParseCmdLine_s_between_withSpace', '', tmpCmdLineParameters.getLanguage);
403 assertFalse('testParseCmdLine_s_between_withSpace', tmpCmdLineParameters.getHelpManagerFlag);
404 assertEqualsInt('testParseCmdLine_s_between_withSpace', 0, tmpCmdLineParameters.getHelpManagerWindow);
405 assertEqualsInt('testParseCmdLine_s_between_withSpace', 0, tmpCmdLineParameters.getOwnerWindow);
406 assertEqualsString('testParseCmdLine_s_between_withSpace', '', tmpCmdLineParameters.getWindowTitle);
407 assertEqualsString('testParseCmdLine_s_between_withSpace', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
408 assertEqualsString('testParseCmdLine_s_between_withSpace', '', tmpCmdLineParameters.getFileNames(false));
409 assertEqualsString('testParseCmdLine_s_between_withSpace', '', tmpCmdLineParameters.getSearchText);
410 END;
411
412
413 PROCEDURE testParseCmdLine_help_and_s;
414 VAR
415 tmpCmdLineString : String;
416 tmpCmdLineParameters : TCmdLineParameters;
417 BEGIN
418 tmpCmdLineString := '-h -s file ';
419 tmpCmdLineParameters := TCmdLineParameters.Create;
420 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
421
422 assertTrue('testParseCmdLine_help_and_s', tmpCmdLineParameters.getShowUsageFlag);
423 assertTrue('testParseCmdLine_help_and_s', tmpCmdLineParameters.getSearchFlag);
424 assertFalse('testParseCmdLine_help_and_s', tmpCmdLineParameters.getGlobalSearchFlag);
425 assertEqualsString('testParseCmdLine_help_and_s', '', tmpCmdLineParameters.getLanguage);
426 assertFalse('testParseCmdLine_help_and_s', tmpCmdLineParameters.getHelpManagerFlag);
427 assertEqualsInt('testParseCmdLine_help_and_s', 0, tmpCmdLineParameters.getHelpManagerWindow);
428 assertEqualsInt('testParseCmdLine_help_and_s', 0, tmpCmdLineParameters.getOwnerWindow);
429 assertEqualsString('testParseCmdLine_help_and_s', '', tmpCmdLineParameters.getWindowTitle);
430 assertEqualsString('testParseCmdLine_help_and_s', 'file', tmpCmdLineParameters.getFileNames(true));
431 assertEqualsString('testParseCmdLine_help_and_s', 'file', tmpCmdLineParameters.getFileNames(false));
432 assertEqualsString('testParseCmdLine_help_and_s', '', tmpCmdLineParameters.getSearchText);
433 END;
434
435
436 PROCEDURE testParseCmdLine_s_and_help;
437 VAR
438 tmpCmdLineString : String;
439 tmpCmdLineParameters : TCmdLineParameters;
440 BEGIN
441 tmpCmdLineString := '-s -h file ';
442 tmpCmdLineParameters := TCmdLineParameters.Create;
443 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
444
445 assertTrue('testParseCmdLine_s_and_help', tmpCmdLineParameters.getShowUsageFlag);
446 assertTrue('testParseCmdLine_s_and_help', tmpCmdLineParameters.getSearchFlag);
447 assertFalse('testParseCmdLine_s_and_help', tmpCmdLineParameters.getGlobalSearchFlag);
448 assertEqualsString('testParseCmdLine_s_and_help', '', tmpCmdLineParameters.getLanguage);
449 assertFalse('testParseCmdLine_s_and_help', tmpCmdLineParameters.getHelpManagerFlag);
450 assertEqualsInt('testParseCmdLine_s_and_help', 0, tmpCmdLineParameters.getHelpManagerWindow);
451 assertEqualsInt('testParseCmdLine_s_and_help', 0, tmpCmdLineParameters.getOwnerWindow);
452 assertEqualsString('testParseCmdLine_s_and_help', '', tmpCmdLineParameters.getWindowTitle);
453 assertEqualsString('testParseCmdLine_s_and_help', 'file', tmpCmdLineParameters.getFileNames(true));
454 assertEqualsString('testParseCmdLine_s_and_help', 'file', tmpCmdLineParameters.getFileNames(false));
455 assertEqualsString('testParseCmdLine_s_and_help', '', tmpCmdLineParameters.getSearchText);
456 END;
457
458
459 PROCEDURE testParseCmdLine_help_and_s_without_blank;
460 VAR
461 tmpCmdLineString : String;
462 tmpCmdLineParameters : TCmdLineParameters;
463 BEGIN
464 tmpCmdLineString := '-s-h file';
465 tmpCmdLineParameters := TCmdLineParameters.Create;
466 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
467
468 assertTrue('testParseCmdLine_help_and_s_without_blank', tmpCmdLineParameters.getShowUsageFlag);
469 assertTrue('testParseCmdLine_help_and_s_without_blank', tmpCmdLineParameters.getSearchFlag);
470 assertFalse('testParseCmdLine_help_and_s_without_blank', tmpCmdLineParameters.getGlobalSearchFlag);
471 assertEqualsString('testParseCmdLine_help_and_s_without_blank', '', tmpCmdLineParameters.getLanguage);
472 assertFalse('testParseCmdLine_help_and_s_without_blank', tmpCmdLineParameters.getHelpManagerFlag);
473 assertEqualsInt('testParseCmdLine_help_and_s_without_blank', 0, tmpCmdLineParameters.getHelpManagerWindow);
474 assertEqualsInt('testParseCmdLine_help_and_s_without_blank', 0, tmpCmdLineParameters.getOwnerWindow);
475 assertEqualsString('testParseCmdLine_help_and_s_without_blank', '', tmpCmdLineParameters.getWindowTitle);
476 assertEqualsString('testParseCmdLine_help_and_s_without_blank', 'file', tmpCmdLineParameters.getFileNames(true));
477 assertEqualsString('testParseCmdLine_help_and_s_without_blank', 'file', tmpCmdLineParameters.getFileNames(false));
478 assertEqualsString('testParseCmdLine_help_and_s_without_blank', '', tmpCmdLineParameters.getSearchText);
479 END;
480
481
482
483 PROCEDURE testParseCmdLine_lowerG;
484 VAR
485 tmpCmdLineString : String;
486 tmpCmdLineParameters : TCmdLineParameters;
487 BEGIN
488 tmpCmdLineString := '-g file search';
489 tmpCmdLineParameters := TCmdLineParameters.Create;
490 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
491
492 assertFalse('testParseCmdLine_lowerG', tmpCmdLineParameters.getShowUsageFlag);
493 assertFalse('testParseCmdLine_lowerG', tmpCmdLineParameters.getSearchFlag);
494 assertTrue('testParseCmdLine_lowerG', tmpCmdLineParameters.getGlobalSearchFlag);
495 assertEqualsString('testParseCmdLine_lowerG', '', tmpCmdLineParameters.getLanguage);
496 assertFalse('testParseCmdLine_lowerG', tmpCmdLineParameters.getHelpManagerFlag);
497 assertEqualsInt('testParseCmdLine_lowerG', 0, tmpCmdLineParameters.getHelpManagerWindow);
498 assertEqualsInt('testParseCmdLine_lowerG', 0, tmpCmdLineParameters.getOwnerWindow);
499 assertEqualsString('testParseCmdLine_lowerG', '', tmpCmdLineParameters.getWindowTitle);
500 assertEqualsString('testParseCmdLine_lowerG', 'file', tmpCmdLineParameters.getFileNames(true));
501 assertEqualsString('testParseCmdLine_lowerG', 'file', tmpCmdLineParameters.getFileNames(false));
502 assertEqualsString('testParseCmdLine_lowerG', 'search', tmpCmdLineParameters.getSearchText);
503 END;
504
505
506 PROCEDURE testParseCmdLine_upperG;
507 VAR
508 tmpCmdLineString : String;
509 tmpCmdLineParameters : TCmdLineParameters;
510 BEGIN
511 tmpCmdLineString := '-G fiLe seArch';
512 tmpCmdLineParameters := TCmdLineParameters.Create;
513 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
514
515 assertFalse('testParseCmdLine_upperG', tmpCmdLineParameters.getShowUsageFlag);
516 assertFalse('testParseCmdLine_upperG', tmpCmdLineParameters.getSearchFlag);
517 assertTrue('testParseCmdLine_upperG', tmpCmdLineParameters.getGlobalSearchFlag);
518 assertEqualsString('testParseCmdLine_upperG', '', tmpCmdLineParameters.getLanguage);
519 assertFalse('testParseCmdLine_upperG', tmpCmdLineParameters.getHelpManagerFlag);
520 assertEqualsInt('testParseCmdLine_upperG', 0, tmpCmdLineParameters.getHelpManagerWindow);
521 assertEqualsInt('testParseCmdLine_upperG', 0, tmpCmdLineParameters.getOwnerWindow);
522 assertEqualsString('testParseCmdLine_upperG', '', tmpCmdLineParameters.getWindowTitle);
523 assertEqualsString('testParseCmdLine_upperG', 'fiLe', tmpCmdLineParameters.getFileNames(true));
524 assertEqualsString('testParseCmdLine_upperG', 'fiLe', tmpCmdLineParameters.getFileNames(false));
525 assertEqualsString('testParseCmdLine_upperG', 'seArch', tmpCmdLineParameters.getSearchText);
526 END;
527
528
529 PROCEDURE testParseCmdLine_QuotedG;
530 VAR
531 tmpCmdLineString : String;
532 tmpCmdLineParameters : TCmdLineParameters;
533 BEGIN
534 tmpCmdLineString := '"-G" seArch';
535 tmpCmdLineParameters := TCmdLineParameters.Create;
536 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
537
538 assertFalse('testParseCmdLine_QuotedG', tmpCmdLineParameters.getShowUsageFlag);
539 assertFalse('testParseCmdLine_QuotedG', tmpCmdLineParameters.getSearchFlag);
540 assertTrue('testParseCmdLine_QuotedG', tmpCmdLineParameters.getGlobalSearchFlag);
541 assertEqualsString('testParseCmdLine_QuotedG', '', tmpCmdLineParameters.getLanguage);
542 assertFalse('testParseCmdLine_QuotedG', tmpCmdLineParameters.getHelpManagerFlag);
543 assertEqualsInt('testParseCmdLine_QuotedG', 0, tmpCmdLineParameters.getHelpManagerWindow);
544 assertEqualsInt('testParseCmdLine_QuotedG', 0, tmpCmdLineParameters.getOwnerWindow);
545 assertEqualsString('testParseCmdLine_QuotedG', '', tmpCmdLineParameters.getWindowTitle);
546 assertEqualsString('testParseCmdLine_QuotedG', '', tmpCmdLineParameters.getFileNames(true));
547 assertEqualsString('testParseCmdLine_QuotedG', '', tmpCmdLineParameters.getFileNames(false));
548 assertEqualsString('testParseCmdLine_QuotedG', 'seArch', tmpCmdLineParameters.getSearchText);
549 END;
550
551
552 PROCEDURE testParseCmdLine_emptyG;
553 VAR
554 tmpCmdLineString : String;
555 tmpCmdLineParameters : TCmdLineParameters;
556 BEGIN
557 tmpCmdLineString := '-G';
558 tmpCmdLineParameters := TCmdLineParameters.Create;
559 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
560
561 assertFalse('testParseCmdLine_emptyG', tmpCmdLineParameters.getShowUsageFlag);
562 assertFalse('testParseCmdLine_emptyG', tmpCmdLineParameters.getSearchFlag);
563 assertTrue('testParseCmdLine_emptyG', tmpCmdLineParameters.getGlobalSearchFlag);
564 assertEqualsString('testParseCmdLine_emptyG', '', tmpCmdLineParameters.getLanguage);
565 assertFalse('testParseCmdLine_emptyG', tmpCmdLineParameters.getHelpManagerFlag);
566 assertEqualsInt('testParseCmdLine_emptyG', 0, tmpCmdLineParameters.getHelpManagerWindow);
567 assertEqualsInt('testParseCmdLine_emptyG', 0, tmpCmdLineParameters.getOwnerWindow);
568 assertEqualsString('testParseCmdLine_emptyG', '', tmpCmdLineParameters.getWindowTitle);
569 assertEqualsString('testParseCmdLine_emptyG', '', tmpCmdLineParameters.getFileNames(true));
570 assertEqualsString('testParseCmdLine_emptyG', '', tmpCmdLineParameters.getFileNames(false));
571 assertEqualsString('testParseCmdLine_emptyG', '', tmpCmdLineParameters.getSearchText);
572 END;
573
574
575 PROCEDURE testParseCmdLine_g_between;
576 VAR
577 tmpCmdLineString : String;
578 tmpCmdLineParameters : TCmdLineParameters;
579 BEGIN
580 tmpCmdLineString := '-h-G-s';
581 tmpCmdLineParameters := TCmdLineParameters.Create;
582 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
583
584 assertTrue('testParseCmdLine_g_between', tmpCmdLineParameters.getShowUsageFlag);
585 assertTrue('testParseCmdLine_g_between', tmpCmdLineParameters.getSearchFlag);
586 assertTrue('testParseCmdLine_g_between', tmpCmdLineParameters.getGlobalSearchFlag);
587 assertEqualsString('testParseCmdLine_g_between', '', tmpCmdLineParameters.getLanguage);
588 assertFalse('testParseCmdLine_g_between', tmpCmdLineParameters.getHelpManagerFlag);
589 assertEqualsInt('testParseCmdLine_g_between', 0, tmpCmdLineParameters.getHelpManagerWindow);
590 assertEqualsInt('testParseCmdLine_g_between', 0, tmpCmdLineParameters.getOwnerWindow);
591 assertEqualsString('testParseCmdLine_g_between', '', tmpCmdLineParameters.getWindowTitle);
592 assertEqualsString('testParseCmdLine_g_between', '', tmpCmdLineParameters.getFileNames(true));
593 assertEqualsString('testParseCmdLine_g_between', '', tmpCmdLineParameters.getFileNames(false));
594 assertEqualsString('testParseCmdLine_g_between', '', tmpCmdLineParameters.getSearchText);
595 END;
596
597
598 PROCEDURE testParseCmdLine_g_between_withSpace;
599 VAR
600 tmpCmdLineString : String;
601 tmpCmdLineParameters : TCmdLineParameters;
602 BEGIN
603 tmpCmdLineString := '-h -G -s';
604 tmpCmdLineParameters := TCmdLineParameters.Create;
605 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
606
607 assertTrue('testParseCmdLine_g_between_withSpace', tmpCmdLineParameters.getShowUsageFlag);
608 assertTrue('testParseCmdLine_g_between_withSpace', tmpCmdLineParameters.getSearchFlag);
609 assertTrue('testParseCmdLine_g_between_withSpace', tmpCmdLineParameters.getGlobalSearchFlag);
610 assertEqualsString('testParseCmdLine_g_between_withSpace', '', tmpCmdLineParameters.getLanguage);
611 assertFalse('testParseCmdLine_g_between_withSpace', tmpCmdLineParameters.getHelpManagerFlag);
612 assertEqualsInt('testParseCmdLine_g_between_withSpace', 0, tmpCmdLineParameters.getHelpManagerWindow);
613 assertEqualsInt('testParseCmdLine_g_between_withSpace', 0, tmpCmdLineParameters.getOwnerWindow);
614 assertEqualsString('testParseCmdLine_g_between_withSpace', '', tmpCmdLineParameters.getWindowTitle);
615 assertEqualsString('testParseCmdLine_g_between_withSpace', '', tmpCmdLineParameters.getFileNames(true));
616 assertEqualsString('testParseCmdLine_g_between_withSpace', '', tmpCmdLineParameters.getFileNames(false));
617 assertEqualsString('testParseCmdLine_g_between_withSpace', '', tmpCmdLineParameters.getSearchText);
618 END;
619
620
621 PROCEDURE testParseCmdLine_Language;
622 VAR
623 tmpCmdLineString : String;
624 tmpCmdLineParameters : TCmdLineParameters;
625 BEGIN
626 tmpCmdLineString := '-lang:DE';
627 tmpCmdLineParameters := TCmdLineParameters.Create;
628 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
629
630 assertFalse('testParseCmdLine_Language', tmpCmdLineParameters.getShowUsageFlag);
631 assertFalse('testParseCmdLine_Language', tmpCmdLineParameters.getSearchFlag);
632 assertFalse('testParseCmdLine_Language', tmpCmdLineParameters.getGlobalSearchFlag);
633 assertEqualsString('testParseCmdLine_Language', 'DE', tmpCmdLineParameters.getLanguage);
634 assertFalse('testParseCmdLine_Language', tmpCmdLineParameters.getHelpManagerFlag);
635 assertEqualsInt('testParseCmdLine_Language', 0, tmpCmdLineParameters.getHelpManagerWindow);
636 assertEqualsInt('testParseCmdLine_Language', 0, tmpCmdLineParameters.getOwnerWindow);
637 assertEqualsString('testParseCmdLine_Language', '', tmpCmdLineParameters.getWindowTitle);
638 assertEqualsString('testParseCmdLine_Language', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
639 assertEqualsString('testParseCmdLine_Language', '', tmpCmdLineParameters.getFileNames(false));
640 assertEqualsString('testParseCmdLine_Language', '', tmpCmdLineParameters.getSearchText);
641 END;
642
643
644 PROCEDURE testParseCmdLine_Language_Empty;
645 VAR
646 tmpCmdLineString : String;
647 tmpCmdLineParameters : TCmdLineParameters;
648 BEGIN
649 tmpCmdLineString := '-lang';
650 tmpCmdLineParameters := TCmdLineParameters.Create;
651 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
652
653 assertFalse('testParseCmdLine_Language_Empty', tmpCmdLineParameters.getShowUsageFlag);
654 assertFalse('testParseCmdLine_Language_Empty', tmpCmdLineParameters.getSearchFlag);
655 assertFalse('testParseCmdLine_Language_Empty', tmpCmdLineParameters.getGlobalSearchFlag);
656 assertEqualsString('testParseCmdLine_Language_Empty', '', tmpCmdLineParameters.getLanguage);
657 assertFalse('testParseCmdLine_Language_Empty', tmpCmdLineParameters.getHelpManagerFlag);
658 assertEqualsInt('testParseCmdLine_Language_Empty', 0, tmpCmdLineParameters.getHelpManagerWindow);
659 assertEqualsInt('testParseCmdLine_Language_Empty', 0, tmpCmdLineParameters.getOwnerWindow);
660 assertEqualsString('testParseCmdLine_Language_Empty', '', tmpCmdLineParameters.getWindowTitle);
661 assertEqualsString('testParseCmdLine_Language_Empty', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
662 assertEqualsString('testParseCmdLine_Language_Empty', '', tmpCmdLineParameters.getFileNames(false));
663 assertEqualsString('testParseCmdLine_Language_Empty', '', tmpCmdLineParameters.getSearchText);
664 END;
665
666
667 PROCEDURE testParseCmdLine_Language_Empty_WithColon;
668 VAR
669 tmpCmdLineString : String;
670 tmpCmdLineParameters : TCmdLineParameters;
671 BEGIN
672 tmpCmdLineString := '-lang:';
673 tmpCmdLineParameters := TCmdLineParameters.Create;
674 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
675
676 assertFalse('testParseCmdLine_Language_Empty_WithColon', tmpCmdLineParameters.getShowUsageFlag);
677 assertFalse('testParseCmdLine_Language_Empty_WithColon', tmpCmdLineParameters.getSearchFlag);
678 assertFalse('testParseCmdLine_Language_Empty_WithColon', tmpCmdLineParameters.getGlobalSearchFlag);
679 assertEqualsString('testParseCmdLine_Language_Empty_WithColon', '', tmpCmdLineParameters.getLanguage);
680 assertFalse('testParseCmdLine_Language_Empty_WithColon', tmpCmdLineParameters.getHelpManagerFlag);
681 assertEqualsInt('testParseCmdLine_Language_Empty_WithColon', 0, tmpCmdLineParameters.getHelpManagerWindow);
682 assertEqualsInt('testParseCmdLine_Language_Empty_WithColon', 0, tmpCmdLineParameters.getOwnerWindow);
683 assertEqualsString('testParseCmdLine_Language_Empty_WithColon', '', tmpCmdLineParameters.getWindowTitle);
684 assertEqualsString('testParseCmdLine_Language_Empty_WithColon', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
685 assertEqualsString('testParseCmdLine_Language_Empty_WithColon', '', tmpCmdLineParameters.getFileNames(false));
686 assertEqualsString('testParseCmdLine_Language_Empty_WithColon', '', tmpCmdLineParameters.getSearchText);
687 END;
688
689
690 PROCEDURE testParseCmdLine_Language_WithFile;
691 VAR
692 tmpCmdLineString : String;
693 tmpCmdLineParameters : TCmdLineParameters;
694 BEGIN
695 tmpCmdLineString := '-lang:DE filE';
696 tmpCmdLineParameters := TCmdLineParameters.Create;
697 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
698
699 assertFalse('testParseCmdLine_Language_WithFile', tmpCmdLineParameters.getShowUsageFlag);
700 assertFalse('testParseCmdLine_Language_WithFile', tmpCmdLineParameters.getSearchFlag);
701 assertFalse('testParseCmdLine_Language_WithFile', tmpCmdLineParameters.getGlobalSearchFlag);
702 assertEqualsString('testParseCmdLine_Language_WithFile', 'DE', tmpCmdLineParameters.getLanguage);
703 assertFalse('testParseCmdLine_Language_WithFile', tmpCmdLineParameters.getHelpManagerFlag);
704 assertEqualsInt('testParseCmdLine_Language_WithFile', 0, tmpCmdLineParameters.getHelpManagerWindow);
705 assertEqualsInt('testParseCmdLine_Language_WithFile', 0, tmpCmdLineParameters.getOwnerWindow);
706 assertEqualsString('testParseCmdLine_Language_WithFile', '', tmpCmdLineParameters.getWindowTitle);
707 assertEqualsString('testParseCmdLine_Language_WithFile', 'filE', tmpCmdLineParameters.getFileNames(true));
708 assertEqualsString('testParseCmdLine_Language_WithFile', 'filE', tmpCmdLineParameters.getFileNames(false));
709 assertEqualsString('testParseCmdLine_Language_WithFile', '', tmpCmdLineParameters.getSearchText);
710 END;
711
712
713 PROCEDURE testParseCmdLine_QuotedLanguage;
714 VAR
715 tmpCmdLineString : String;
716 tmpCmdLineParameters : TCmdLineParameters;
717 BEGIN
718 tmpCmdLineString := '"-lang:DE" filE';
719 tmpCmdLineParameters := TCmdLineParameters.Create;
720 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
721
722 assertFalse('testParseCmdLine_QuotedLanguage', tmpCmdLineParameters.getShowUsageFlag);
723 assertFalse('testParseCmdLine_QuotedLanguage', tmpCmdLineParameters.getSearchFlag);
724 assertFalse('testParseCmdLine_QuotedLanguage', tmpCmdLineParameters.getGlobalSearchFlag);
725 assertEqualsString('testParseCmdLine_QuotedLanguage', 'DE', tmpCmdLineParameters.getLanguage);
726 assertFalse('testParseCmdLine_QuotedLanguage', tmpCmdLineParameters.getHelpManagerFlag);
727 assertEqualsInt('testParseCmdLine_QuotedLanguage', 0, tmpCmdLineParameters.getHelpManagerWindow);
728 assertEqualsInt('testParseCmdLine_QuotedLanguage', 0, tmpCmdLineParameters.getOwnerWindow);
729 assertEqualsString('testParseCmdLine_QuotedLanguage', '', tmpCmdLineParameters.getWindowTitle);
730 assertEqualsString('testParseCmdLine_QuotedLanguage', 'filE', tmpCmdLineParameters.getFileNames(true));
731 assertEqualsString('testParseCmdLine_QuotedLanguage', 'filE', tmpCmdLineParameters.getFileNames(false));
732 assertEqualsString('testParseCmdLine_QuotedLanguage', '', tmpCmdLineParameters.getSearchText);
733 END;
734
735
736 PROCEDURE testParseCmdLine_QuotedLanguage2;
737 VAR
738 tmpCmdLineString : String;
739 tmpCmdLineParameters : TCmdLineParameters;
740 BEGIN
741 tmpCmdLineString := '-lang:"DE" filE';
742 tmpCmdLineParameters := TCmdLineParameters.Create;
743 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
744
745 assertFalse('testParseCmdLine_QuotedLanguage2', tmpCmdLineParameters.getShowUsageFlag);
746 assertFalse('testParseCmdLine_QuotedLanguage2', tmpCmdLineParameters.getSearchFlag);
747 assertFalse('testParseCmdLine_QuotedLanguage2', tmpCmdLineParameters.getGlobalSearchFlag);
748 assertEqualsString('testParseCmdLine_QuotedLanguage2', 'DE', tmpCmdLineParameters.getLanguage);
749 assertFalse('testParseCmdLine_QuotedLanguage2', tmpCmdLineParameters.getHelpManagerFlag);
750 assertEqualsInt('testParseCmdLine_QuotedLanguage2', 0, tmpCmdLineParameters.getHelpManagerWindow);
751 assertEqualsInt('testParseCmdLine_QuotedLanguage2', 0, tmpCmdLineParameters.getOwnerWindow);
752 assertEqualsString('testParseCmdLine_QuotedLanguage2', '', tmpCmdLineParameters.getWindowTitle);
753 assertEqualsString('testParseCmdLine_QuotedLanguage2', 'filE', tmpCmdLineParameters.getFileNames(true));
754 assertEqualsString('testParseCmdLine_QuotedLanguage2', 'filE', tmpCmdLineParameters.getFileNames(false));
755 assertEqualsString('testParseCmdLine_QuotedLanguage2', '', tmpCmdLineParameters.getSearchText);
756 END;
757
758
759 PROCEDURE testParseCmdLine_Language_between;
760 VAR
761 tmpCmdLineString : String;
762 tmpCmdLineParameters : TCmdLineParameters;
763 BEGIN
764 tmpCmdLineString := '-s-lang:DE-h filE';
765 tmpCmdLineParameters := TCmdLineParameters.Create;
766 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
767
768 assertTrue('testParseCmdLine_Language_between', tmpCmdLineParameters.getShowUsageFlag);
769 assertTrue('testParseCmdLine_Language_between', tmpCmdLineParameters.getSearchFlag);
770 assertFalse('testParseCmdLine_Language_between', tmpCmdLineParameters.getGlobalSearchFlag);
771 assertEqualsString('testParseCmdLine_Language_between', 'DE', tmpCmdLineParameters.getLanguage);
772 assertFalse('testParseCmdLine_Language_between', tmpCmdLineParameters.getHelpManagerFlag);
773 assertEqualsInt('testParseCmdLine_Language_between', 0, tmpCmdLineParameters.getHelpManagerWindow);
774 assertEqualsInt('testParseCmdLine_Language_between', 0, tmpCmdLineParameters.getOwnerWindow);
775 assertEqualsString('testParseCmdLine_Language_between', '', tmpCmdLineParameters.getWindowTitle);
776 assertEqualsString('testParseCmdLine_Language_between', 'filE', tmpCmdLineParameters.getFileNames(true));
777 assertEqualsString('testParseCmdLine_Language_between', 'filE', tmpCmdLineParameters.getFileNames(false));
778 assertEqualsString('testParseCmdLine_Language_between', '', tmpCmdLineParameters.getSearchText);
779 END;
780
781
782 PROCEDURE testParseCmdLine_Language_between_withSpace;
783 VAR
784 tmpCmdLineString : String;
785 tmpCmdLineParameters : TCmdLineParameters;
786 BEGIN
787 tmpCmdLineString := '-s-lang:DE-h filE';
788 tmpCmdLineParameters := TCmdLineParameters.Create;
789 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
790
791 assertTrue('testParseCmdLine_Language_between_withSpace', tmpCmdLineParameters.getShowUsageFlag);
792 assertTrue('testParseCmdLine_Language_between_withSpace', tmpCmdLineParameters.getSearchFlag);
793 assertFalse('testParseCmdLine_Language_between_withSpace', tmpCmdLineParameters.getGlobalSearchFlag);
794 assertEqualsString('testParseCmdLine_Language_between_withSpace', 'DE', tmpCmdLineParameters.getLanguage);
795 assertFalse('testParseCmdLine_Language_between_withSpace', tmpCmdLineParameters.getHelpManagerFlag);
796 assertEqualsInt('testParseCmdLine_Language_between_withSpace', 0, tmpCmdLineParameters.getHelpManagerWindow);
797 assertEqualsInt('testParseCmdLine_Language_between_withSpace', 0, tmpCmdLineParameters.getOwnerWindow);
798 assertEqualsString('testParseCmdLine_Language_between_withSpace', '', tmpCmdLineParameters.getWindowTitle);
799 assertEqualsString('testParseCmdLine_Language_between_withSpace', 'filE', tmpCmdLineParameters.getFileNames(true));
800 assertEqualsString('testParseCmdLine_Language_between_withSpace', 'filE', tmpCmdLineParameters.getFileNames(false));
801 assertEqualsString('testParseCmdLine_Language_between_withSpace', '', tmpCmdLineParameters.getSearchText);
802 END;
803
804
805 PROCEDURE testParseCmdLine_HelpManagerNumber;
806 VAR
807 tmpCmdLineString : String;
808 tmpCmdLineParameters : TCmdLineParameters;
809 BEGIN
810 tmpCmdLineString := '-Hm:123';
811 tmpCmdLineParameters := TCmdLineParameters.Create;
812 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
813
814 assertFalse('testParseCmdLine_HelpManagerNumber', tmpCmdLineParameters.getShowUsageFlag);
815 assertFalse('testParseCmdLine_HelpManagerNumber', tmpCmdLineParameters.getSearchFlag);
816 assertFalse('testParseCmdLine_HelpManagerNumber', tmpCmdLineParameters.getGlobalSearchFlag);
817 assertEqualsString('testParseCmdLine_HelpManagerNumber', '', tmpCmdLineParameters.getLanguage);
818 assertTrue('testParseCmdLine_HelpManagerNumber', tmpCmdLineParameters.getHelpManagerFlag);
819 assertEqualsInt('testParseCmdLine_HelpManagerNumber', 123, tmpCmdLineParameters.getHelpManagerWindow);
820 assertEqualsInt('testParseCmdLine_HelpManagerNumber', 0, tmpCmdLineParameters.getOwnerWindow);
821 assertEqualsString('testParseCmdLine_HelpManagerNumber', '', tmpCmdLineParameters.getWindowTitle);
822 assertEqualsString('testParseCmdLine_HelpManagerNumber', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
823 assertEqualsString('testParseCmdLine_HelpManagerNumber', '', tmpCmdLineParameters.getFileNames(false));
824 assertEqualsString('testParseCmdLine_HelpManagerNumber', '', tmpCmdLineParameters.getSearchText);
825 END;
826
827
828 PROCEDURE testParseCmdLine_HelpManagerBigNumber;
829 VAR
830 tmpCmdLineString : String;
831 tmpCmdLineParameters : TCmdLineParameters;
832 BEGIN
833 tmpCmdLineString := '-Hm:2147484546';
834 tmpCmdLineParameters := TCmdLineParameters.Create;
835 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
836
837 assertFalse('testParseCmdLine_HelpManagerBigNumber', tmpCmdLineParameters.getShowUsageFlag);
838 assertFalse('testParseCmdLine_HelpManagerBigNumber', tmpCmdLineParameters.getSearchFlag);
839 assertFalse('testParseCmdLine_HelpManagerBigNumber', tmpCmdLineParameters.getGlobalSearchFlag);
840 assertEqualsString('testParseCmdLine_HelpManagerBigNumber', '', tmpCmdLineParameters.getLanguage);
841 assertTrue('testParseCmdLine_HelpManagerBigNumber', tmpCmdLineParameters.getHelpManagerFlag);
842 assertEqualsInt('testParseCmdLine_HelpManagerBigNumber', 2147484546, tmpCmdLineParameters.getHelpManagerWindow);
843 assertEqualsInt('testParseCmdLine_HelpManagerBigNumber', 0, tmpCmdLineParameters.getOwnerWindow);
844 assertEqualsString('testParseCmdLine_HelpManagerBigNumber', '', tmpCmdLineParameters.getWindowTitle);
845 assertEqualsString('testParseCmdLine_HelpManagerBigNumber', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
846 assertEqualsString('testParseCmdLine_HelpManagerBigNumber', '', tmpCmdLineParameters.getFileNames(false));
847 assertEqualsString('testParseCmdLine_HelpManagerBigNumber', '', tmpCmdLineParameters.getSearchText);
848 END;
849
850
851 PROCEDURE testParseCmdLine_HelpManagerNumber_WithoutColon;
852 VAR
853 tmpCmdLineString : String;
854 tmpCmdLineParameters : TCmdLineParameters;
855 BEGIN
856 tmpCmdLineString := '-Hm123';
857 tmpCmdLineParameters := TCmdLineParameters.Create;
858 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
859
860 assertFalse('testParseCmdLine_HelpManagerNumber_WithoutColon', tmpCmdLineParameters.getShowUsageFlag);
861 assertFalse('testParseCmdLine_HelpManagerNumber_WithoutColon', tmpCmdLineParameters.getSearchFlag);
862 assertFalse('testParseCmdLine_HelpManagerNumber_WithoutColon', tmpCmdLineParameters.getGlobalSearchFlag);
863 assertEqualsString('testParseCmdLine_HelpManagerNumber_WithoutColon', '', tmpCmdLineParameters.getLanguage);
864 assertTrue('testParseCmdLine_HelpManagerNumber_WithoutColon', tmpCmdLineParameters.getHelpManagerFlag);
865 assertEqualsInt('testParseCmdLine_HelpManagerNumber_WithoutColon', 123, tmpCmdLineParameters.getHelpManagerWindow);
866 assertEqualsInt('testParseCmdLine_HelpManagerNumber_WithoutColon', 0, tmpCmdLineParameters.getOwnerWindow);
867 assertEqualsString('testParseCmdLine_HelpManagerNumber_WithoutColon', '', tmpCmdLineParameters.getWindowTitle);
868 assertEqualsString('testParseCmdLine_HelpManagerNumber_WithoutColon', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
869 assertEqualsString('testParseCmdLine_HelpManagerNumber_WithoutColon', '', tmpCmdLineParameters.getFileNames(false));
870 assertEqualsString('testParseCmdLine_HelpManagerNumber_WithoutColon', '', tmpCmdLineParameters.getSearchText);
871 END;
872
873
874 PROCEDURE testParseCmdLine_HelpManagerNumber_Invalid;
875 VAR
876 tmpCmdLineString : String;
877 tmpCmdLineParameters : TCmdLineParameters;
878 BEGIN
879 tmpCmdLineString := '-Hm:12u3';
880 tmpCmdLineParameters := TCmdLineParameters.Create;
881 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
882
883 assertTrue('testParseCmdLine_HelpManagerNumber_Invalid', tmpCmdLineParameters.getShowUsageFlag);
884 assertFalse('testParseCmdLine_HelpManagerNumber_Invalid', tmpCmdLineParameters.getSearchFlag);
885 assertFalse('testParseCmdLine_HelpManagerNumber_Invalid', tmpCmdLineParameters.getGlobalSearchFlag);
886 assertEqualsString('testParseCmdLine_HelpManagerNumber_Invalid', '', tmpCmdLineParameters.getLanguage);
887 assertFalse('testParseCmdLine_HelpManagerNumber_Invalid', tmpCmdLineParameters.getHelpManagerFlag);
888 assertEqualsInt('testParseCmdLine_HelpManagerNumber_Invalid', 0, tmpCmdLineParameters.getHelpManagerWindow);
889 assertEqualsInt('testParseCmdLine_HelpManagerNumber_Invalid', 0, tmpCmdLineParameters.getOwnerWindow);
890 assertEqualsString('testParseCmdLine_HelpManagerNumber_Invalid', '', tmpCmdLineParameters.getWindowTitle);
891 assertEqualsString('testParseCmdLine_HelpManagerNumber_Invalid', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
892 assertEqualsString('testParseCmdLine_HelpManagerNumber_Invalid', '', tmpCmdLineParameters.getFileNames(false));
893 assertEqualsString('testParseCmdLine_HelpManagerNumber_Invalid', '', tmpCmdLineParameters.getSearchText);
894 END;
895
896
897 PROCEDURE testParseCmdLine_HelpManagerNumber_between;
898 VAR
899 tmpCmdLineString : String;
900 tmpCmdLineParameters : TCmdLineParameters;
901 BEGIN
902 tmpCmdLineString := '-s-Hm:12-h';
903 tmpCmdLineParameters := TCmdLineParameters.Create;
904 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
905
906 assertTrue('testParseCmdLine_HelpManagerNumber_between', tmpCmdLineParameters.getShowUsageFlag);
907 assertTrue('testParseCmdLine_HelpManagerNumber_between', tmpCmdLineParameters.getSearchFlag);
908 assertFalse('testParseCmdLine_HelpManagerNumber_between', tmpCmdLineParameters.getGlobalSearchFlag);
909 assertEqualsString('testParseCmdLine_HelpManagerNumber_between', '', tmpCmdLineParameters.getLanguage);
910 assertTrue('testParseCmdLine_HelpManagerNumber_between', tmpCmdLineParameters.getHelpManagerFlag);
911 assertEqualsInt('testParseCmdLine_HelpManagerNumber_between', 12, tmpCmdLineParameters.getHelpManagerWindow);
912 assertEqualsInt('testParseCmdLine_HelpManagerNumber_between', 0, tmpCmdLineParameters.getOwnerWindow);
913 assertEqualsString('testParseCmdLine_HelpManagerNumber_between', '', tmpCmdLineParameters.getWindowTitle);
914 assertEqualsString('testParseCmdLine_HelpManagerNumber_between', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
915 assertEqualsString('testParseCmdLine_HelpManagerNumber_between', '', tmpCmdLineParameters.getFileNames(false));
916 assertEqualsString('testParseCmdLine_HelpManagerNumber_between', '', tmpCmdLineParameters.getSearchText);
917 END;
918
919
920 PROCEDURE testParseCmdLine_HelpManagerNumber_between_withSpace;
921 VAR
922 tmpCmdLineString : String;
923 tmpCmdLineParameters : TCmdLineParameters;
924 BEGIN
925 tmpCmdLineString := '-s -Hm:12 -h';
926 tmpCmdLineParameters := TCmdLineParameters.Create;
927 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
928
929 assertTrue('testParseCmdLine_HelpManagerNumber_between_withSpace', tmpCmdLineParameters.getShowUsageFlag);
930 assertTrue('testParseCmdLine_HelpManagerNumber_between_withSpace', tmpCmdLineParameters.getSearchFlag);
931 assertFalse('testParseCmdLine_HelpManagerNumber_between_withSpace', tmpCmdLineParameters.getGlobalSearchFlag);
932 assertEqualsString('testParseCmdLine_HelpManagerNumber_between_withSpace', '', tmpCmdLineParameters.getLanguage);
933 assertTrue('testParseCmdLine_HelpManagerNumber_between_withSpace', tmpCmdLineParameters.getHelpManagerFlag);
934 assertEqualsInt('testParseCmdLine_HelpManagerNumber_between_withSpace', 12, tmpCmdLineParameters.getHelpManagerWindow);
935 assertEqualsInt('testParseCmdLine_HelpManagerNumber_between_withSpace', 0, tmpCmdLineParameters.getOwnerWindow);
936 assertEqualsString('testParseCmdLine_HelpManagerNumber_between_withSpace', '', tmpCmdLineParameters.getWindowTitle);
937 assertEqualsString('testParseCmdLine_HelpManagerNumber_between_withSpace', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
938 assertEqualsString('testParseCmdLine_HelpManagerNumber_between_withSpace', '', tmpCmdLineParameters.getFileNames(false));
939 assertEqualsString('testParseCmdLine_HelpManagerNumber_between_withSpace', '', tmpCmdLineParameters.getSearchText);
940 END;
941
942
943 PROCEDURE testParseCmdLine_OwnerNumber;
944 VAR
945 tmpCmdLineString : String;
946 tmpCmdLineParameters : TCmdLineParameters;
947 BEGIN
948 tmpCmdLineString := '-owNer:1234';
949 tmpCmdLineParameters := TCmdLineParameters.Create;
950 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
951
952 assertFalse('testParseCmdLine_OwnerNumber', tmpCmdLineParameters.getShowUsageFlag);
953 assertFalse('testParseCmdLine_OwnerNumber', tmpCmdLineParameters.getSearchFlag);
954 assertFalse('testParseCmdLine_OwnerNumber', tmpCmdLineParameters.getGlobalSearchFlag);
955 assertEqualsString('testParseCmdLine_OwnerNumber', '', tmpCmdLineParameters.getLanguage);
956 assertFalse('testParseCmdLine_OwnerNumber', tmpCmdLineParameters.getHelpManagerFlag);
957 assertEqualsInt('testParseCmdLine_OwnerNumber', 0, tmpCmdLineParameters.getHelpManagerWindow);
958 assertEqualsInt('testParseCmdLine_OwnerNumber', 1234, tmpCmdLineParameters.getOwnerWindow);
959 assertEqualsString('testParseCmdLine_OwnerNumber', '', tmpCmdLineParameters.getWindowTitle);
960 assertEqualsString('testParseCmdLine_OwnerNumber', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
961 assertEqualsString('testParseCmdLine_OwnerNumber', '', tmpCmdLineParameters.getFileNames(false));
962 assertEqualsString('testParseCmdLine_OwnerNumber', '', tmpCmdLineParameters.getSearchText);
963 END;
964
965
966 PROCEDURE testParseCmdLine_OwnerNumber_WithoutColon;
967 VAR
968 tmpCmdLineString : String;
969 tmpCmdLineParameters : TCmdLineParameters;
970 BEGIN
971 tmpCmdLineString := '-OWNER134';
972 tmpCmdLineParameters := TCmdLineParameters.Create;
973 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
974
975 assertFalse('testParseCmdLine_OwnerNumber_WithoutColon', tmpCmdLineParameters.getShowUsageFlag);
976 assertFalse('testParseCmdLine_OwnerNumber_WithoutColon', tmpCmdLineParameters.getSearchFlag);
977 assertFalse('testParseCmdLine_OwnerNumber_WithoutColon', tmpCmdLineParameters.getGlobalSearchFlag);
978 assertEqualsString('testParseCmdLine_OwnerNumber_WithoutColon', '', tmpCmdLineParameters.getLanguage);
979 assertFalse('testParseCmdLine_OwnerNumber_WithoutColon', tmpCmdLineParameters.getHelpManagerFlag);
980 assertEqualsInt('testParseCmdLine_OwnerNumber_WithoutColon', 0, tmpCmdLineParameters.getHelpManagerWindow);
981 assertEqualsInt('testParseCmdLine_OwnerNumber_WithoutColon', 134, tmpCmdLineParameters.getOwnerWindow);
982 assertEqualsString('testParseCmdLine_OwnerNumber_WithoutColon', '', tmpCmdLineParameters.getWindowTitle);
983 assertEqualsString('testParseCmdLine_OwnerNumber_WithoutColon', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
984 assertEqualsString('testParseCmdLine_OwnerNumber_WithoutColon', '', tmpCmdLineParameters.getFileNames(false));
985 assertEqualsString('testParseCmdLine_OwnerNumber_WithoutColon', '', tmpCmdLineParameters.getSearchText);
986 END;
987
988
989 PROCEDURE testParseCmdLine_OwnerNumber_Invalid;
990 VAR
991 tmpCmdLineString : String;
992 tmpCmdLineParameters : TCmdLineParameters;
993 BEGIN
994 tmpCmdLineString := '-owner:12x34';
995 tmpCmdLineParameters := TCmdLineParameters.Create;
996 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
997
998 assertTrue('testParseCmdLine_OwnerNumber_Invalid', tmpCmdLineParameters.getShowUsageFlag);
999 assertFalse('testParseCmdLine_OwnerNumber_Invalid', tmpCmdLineParameters.getSearchFlag);
1000 assertFalse('testParseCmdLine_OwnerNumber_Invalid', tmpCmdLineParameters.getGlobalSearchFlag);
1001 assertEqualsString('testParseCmdLine_OwnerNumber_Invalid', '', tmpCmdLineParameters.getLanguage);
1002 assertFalse('testParseCmdLine_OwnerNumber_Invalid', tmpCmdLineParameters.getHelpManagerFlag);
1003 assertEqualsInt('testParseCmdLine_OwnerNumber_Invalid', 0, tmpCmdLineParameters.getHelpManagerWindow);
1004 assertEqualsInt('testParseCmdLine_OwnerNumber_Invalid', 0, tmpCmdLineParameters.getOwnerWindow);
1005 assertEqualsString('testParseCmdLine_OwnerNumber_Invalid', '', tmpCmdLineParameters.getWindowTitle);
1006 assertEqualsString('testParseCmdLine_OwnerNumber_Invalid', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
1007 assertEqualsString('testParseCmdLine_OwnerNumber_Invalid', '', tmpCmdLineParameters.getFileNames(false));
1008 assertEqualsString('testParseCmdLine_OwnerNumber_Invalid', '', tmpCmdLineParameters.getSearchText);
1009 END;
1010
1011
1012 PROCEDURE testParseCmdLine_OwnerNumber_between;
1013 VAR
1014 tmpCmdLineString : String;
1015 tmpCmdLineParameters : TCmdLineParameters;
1016 BEGIN
1017 tmpCmdLineString := '-g-owner:14-s';
1018 tmpCmdLineParameters := TCmdLineParameters.Create;
1019 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1020
1021 assertFalse('testParseCmdLine_OwnerNumber_between', tmpCmdLineParameters.getShowUsageFlag);
1022 assertTrue('testParseCmdLine_OwnerNumber_between', tmpCmdLineParameters.getSearchFlag);
1023 assertTrue('testParseCmdLine_OwnerNumber_between', tmpCmdLineParameters.getGlobalSearchFlag);
1024 assertEqualsString('testParseCmdLine_OwnerNumber_between', '', tmpCmdLineParameters.getLanguage);
1025 assertFalse('testParseCmdLine_OwnerNumber_between', tmpCmdLineParameters.getHelpManagerFlag);
1026 assertEqualsInt('testParseCmdLine_OwnerNumber_between', 0, tmpCmdLineParameters.getHelpManagerWindow);
1027 assertEqualsInt('testParseCmdLine_OwnerNumber_between', 14, tmpCmdLineParameters.getOwnerWindow);
1028 assertEqualsString('testParseCmdLine_OwnerNumber_between', '', tmpCmdLineParameters.getWindowTitle);
1029 assertEqualsString('testParseCmdLine_OwnerNumber_between', '', tmpCmdLineParameters.getFileNames(true));
1030 assertEqualsString('testParseCmdLine_OwnerNumber_between', '', tmpCmdLineParameters.getFileNames(false));
1031 assertEqualsString('testParseCmdLine_OwnerNumber_between', '', tmpCmdLineParameters.getSearchText);
1032 END;
1033
1034
1035 PROCEDURE testParseCmdLine_OwnerNumber_between_withSpace;
1036 VAR
1037 tmpCmdLineString : String;
1038 tmpCmdLineParameters : TCmdLineParameters;
1039 BEGIN
1040 tmpCmdLineString := '-g -owner:14 -s';
1041 tmpCmdLineParameters := TCmdLineParameters.Create;
1042 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1043
1044 assertFalse('testParseCmdLine_OwnerNumber_between_withSpace', tmpCmdLineParameters.getShowUsageFlag);
1045 assertTrue('testParseCmdLine_OwnerNumber_between_withSpace', tmpCmdLineParameters.getSearchFlag);
1046 assertTrue('testParseCmdLine_OwnerNumber_between_withSpace', tmpCmdLineParameters.getGlobalSearchFlag);
1047 assertEqualsString('testParseCmdLine_OwnerNumber_between_withSpace', '', tmpCmdLineParameters.getLanguage);
1048 assertFalse('testParseCmdLine_OwnerNumber_between_withSpace', tmpCmdLineParameters.getHelpManagerFlag);
1049 assertEqualsInt('testParseCmdLine_OwnerNumber_between_withSpace', 0, tmpCmdLineParameters.getHelpManagerWindow);
1050 assertEqualsInt('testParseCmdLine_OwnerNumber_between_withSpace', 14, tmpCmdLineParameters.getOwnerWindow);
1051 assertEqualsString('testParseCmdLine_OwnerNumber_between_withSpace', '', tmpCmdLineParameters.getWindowTitle);
1052 assertEqualsString('testParseCmdLine_OwnerNumber_between_withSpace', '', tmpCmdLineParameters.getFileNames(true));
1053 assertEqualsString('testParseCmdLine_OwnerNumber_between_withSpace', '', tmpCmdLineParameters.getFileNames(false));
1054 assertEqualsString('testParseCmdLine_OwnerNumber_between_withSpace', '', tmpCmdLineParameters.getSearchText);
1055 END;
1056
1057
1058 PROCEDURE testParseCmdLine_Title;
1059 VAR
1060 tmpCmdLineString : String;
1061 tmpCmdLineParameters : TCmdLineParameters;
1062 BEGIN
1063 tmpCmdLineString := '-Title:Test';
1064 tmpCmdLineParameters := TCmdLineParameters.Create;
1065 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1066
1067 assertFalse('testParseCmdLine_Title', tmpCmdLineParameters.getShowUsageFlag);
1068 assertFalse('testParseCmdLine_Title', tmpCmdLineParameters.getSearchFlag);
1069 assertFalse('testParseCmdLine_Title', tmpCmdLineParameters.getGlobalSearchFlag);
1070 assertEqualsString('testParseCmdLine_Title', '', tmpCmdLineParameters.getLanguage);
1071 assertFalse('testParseCmdLine_Title', tmpCmdLineParameters.getHelpManagerFlag);
1072 assertEqualsInt('testParseCmdLine_Title', 0, tmpCmdLineParameters.getHelpManagerWindow);
1073 assertEqualsInt('testParseCmdLine_Title', 0, tmpCmdLineParameters.getOwnerWindow);
1074 assertEqualsString('testParseCmdLine_Title', 'Test', tmpCmdLineParameters.getWindowTitle);
1075 assertEqualsString('testParseCmdLine_Title', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
1076 assertEqualsString('testParseCmdLine_Title', '', tmpCmdLineParameters.getFileNames(false));
1077 assertEqualsString('testParseCmdLine_Title', '', tmpCmdLineParameters.getSearchText);
1078 END;
1079
1080
1081 PROCEDURE testParseCmdLine_Title_WithoutColon;
1082 VAR
1083 tmpCmdLineString : String;
1084 tmpCmdLineParameters : TCmdLineParameters;
1085 BEGIN
1086 tmpCmdLineString := '-titletitlE';
1087 tmpCmdLineParameters := TCmdLineParameters.Create;
1088 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1089
1090 assertFalse('testParseCmdLine_Title_WithoutColon', tmpCmdLineParameters.getShowUsageFlag);
1091 assertFalse('testParseCmdLine_Title_WithoutColon', tmpCmdLineParameters.getSearchFlag);
1092 assertFalse('testParseCmdLine_Title_WithoutColon', tmpCmdLineParameters.getGlobalSearchFlag);
1093 assertEqualsString('testParseCmdLine_Title_WithoutColon', '', tmpCmdLineParameters.getLanguage);
1094 assertFalse('testParseCmdLine_Title_WithoutColon', tmpCmdLineParameters.getHelpManagerFlag);
1095 assertEqualsInt('testParseCmdLine_Title_WithoutColon', 0, tmpCmdLineParameters.getHelpManagerWindow);
1096 assertEqualsInt('testParseCmdLine_Title_WithoutColon', 0, tmpCmdLineParameters.getOwnerWindow);
1097 assertEqualsString('testParseCmdLine_Title_WithoutColon', 'titlE', tmpCmdLineParameters.getWindowTitle);
1098 assertEqualsString('testParseCmdLine_Title_WithoutColon', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
1099 assertEqualsString('testParseCmdLine_Title_WithoutColon', '', tmpCmdLineParameters.getFileNames(false));
1100 assertEqualsString('testParseCmdLine_Title_WithoutColon', '', tmpCmdLineParameters.getSearchText);
1101 END;
1102
1103
1104 PROCEDURE testParseCmdLine_Title_Empty;
1105 VAR
1106 tmpCmdLineString : String;
1107 tmpCmdLineParameters : TCmdLineParameters;
1108 BEGIN
1109 tmpCmdLineString := '-TITLE:';
1110 tmpCmdLineParameters := TCmdLineParameters.Create;
1111 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1112
1113 assertFalse('testParseCmdLine_Title_Empty', tmpCmdLineParameters.getShowUsageFlag);
1114 assertFalse('testParseCmdLine_Title_Empty', tmpCmdLineParameters.getSearchFlag);
1115 assertFalse('testParseCmdLine_Title_Empty', tmpCmdLineParameters.getGlobalSearchFlag);
1116 assertEqualsString('testParseCmdLine_Title_Empty', '', tmpCmdLineParameters.getLanguage);
1117 assertFalse('testParseCmdLine_Title_Empty', tmpCmdLineParameters.getHelpManagerFlag);
1118 assertEqualsInt('testParseCmdLine_Title_Empty', 0, tmpCmdLineParameters.getHelpManagerWindow);
1119 assertEqualsInt('testParseCmdLine_Title_Empty', 0, tmpCmdLineParameters.getOwnerWindow);
1120 assertEqualsString('testParseCmdLine_Title_Empty', '', tmpCmdLineParameters.getWindowTitle);
1121 assertEqualsString('testParseCmdLine_Title_Empty', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
1122 assertEqualsString('testParseCmdLine_Title_Empty', '', tmpCmdLineParameters.getFileNames(false));
1123 assertEqualsString('testParseCmdLine_Title_Empty', '', tmpCmdLineParameters.getSearchText);
1124 END;
1125
1126
1127 PROCEDURE testParseCmdLine_QuotedTitle;
1128 VAR
1129 tmpCmdLineString : String;
1130 tmpCmdLineParameters : TCmdLineParameters;
1131 BEGIN
1132 tmpCmdLineString := '"-Title:Test Title"';
1133 tmpCmdLineParameters := TCmdLineParameters.Create;
1134 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1135
1136 assertFalse('testParseCmdLine_QuotedTitle', tmpCmdLineParameters.getShowUsageFlag);
1137 assertFalse('testParseCmdLine_QuotedTitle', tmpCmdLineParameters.getSearchFlag);
1138 assertFalse('testParseCmdLine_QuotedTitle', tmpCmdLineParameters.getGlobalSearchFlag);
1139 assertEqualsString('testParseCmdLine_QuotedTitle', '', tmpCmdLineParameters.getLanguage);
1140 assertFalse('testParseCmdLine_QuotedTitle', tmpCmdLineParameters.getHelpManagerFlag);
1141 assertEqualsInt('testParseCmdLine_QuotedTitle', 0, tmpCmdLineParameters.getHelpManagerWindow);
1142 assertEqualsInt('testParseCmdLine_QuotedTitle', 0, tmpCmdLineParameters.getOwnerWindow);
1143 assertEqualsString('testParseCmdLine_QuotedTitle', 'Test Title', tmpCmdLineParameters.getWindowTitle);
1144 assertEqualsString('testParseCmdLine_QuotedTitle', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
1145 assertEqualsString('testParseCmdLine_QuotedTitle', '', tmpCmdLineParameters.getFileNames(false));
1146 assertEqualsString('testParseCmdLine_QuotedTitle', '', tmpCmdLineParameters.getSearchText);
1147 END;
1148
1149
1150 PROCEDURE testParseCmdLine_QuotedTitle2;
1151 VAR
1152 tmpCmdLineString : String;
1153 tmpCmdLineParameters : TCmdLineParameters;
1154 BEGIN
1155 tmpCmdLineString := '-Title:"Test Title"';
1156 tmpCmdLineParameters := TCmdLineParameters.Create;
1157 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1158
1159 assertFalse('testParseCmdLine_QuotedTitle2', tmpCmdLineParameters.getShowUsageFlag);
1160 assertFalse('testParseCmdLine_QuotedTitle2', tmpCmdLineParameters.getSearchFlag);
1161 assertFalse('testParseCmdLine_QuotedTitle2', tmpCmdLineParameters.getGlobalSearchFlag);
1162 assertEqualsString('testParseCmdLine_QuotedTitle2', '', tmpCmdLineParameters.getLanguage);
1163 assertFalse('testParseCmdLine_QuotedTitle2', tmpCmdLineParameters.getHelpManagerFlag);
1164 assertEqualsInt('testParseCmdLine_QuotedTitle2', 0, tmpCmdLineParameters.getHelpManagerWindow);
1165 assertEqualsInt('testParseCmdLine_QuotedTitle2', 0, tmpCmdLineParameters.getOwnerWindow);
1166 assertEqualsString('testParseCmdLine_QuotedTitle2', 'Test Title', tmpCmdLineParameters.getWindowTitle);
1167 assertEqualsString('testParseCmdLine_QuotedTitle2', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
1168 assertEqualsString('testParseCmdLine_QuotedTitle2', '', tmpCmdLineParameters.getFileNames(false));
1169 assertEqualsString('testParseCmdLine_QuotedTitle2', '', tmpCmdLineParameters.getSearchText);
1170 END;
1171
1172
1173 PROCEDURE testParseCmdLine_QuotedTitle_AfterFile;
1174 VAR
1175 tmpCmdLineString : String;
1176 tmpCmdLineParameters : TCmdLineParameters;
1177 BEGIN
1178 tmpCmdLineString := 'cmdref "-Title:Test Title"';
1179 tmpCmdLineParameters := TCmdLineParameters.Create;
1180 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1181
1182 assertFalse('testParseCmdLine_QuotedTitle_AfterFile', tmpCmdLineParameters.getShowUsageFlag);
1183 assertFalse('testParseCmdLine_QuotedTitle_AfterFile', tmpCmdLineParameters.getSearchFlag);
1184 assertFalse('testParseCmdLine_QuotedTitle_AfterFile', tmpCmdLineParameters.getGlobalSearchFlag);
1185 assertEqualsString('testParseCmdLine_QuotedTitle_AfterFile', '', tmpCmdLineParameters.getLanguage);
1186 assertFalse('testParseCmdLine_QuotedTitle_AfterFile', tmpCmdLineParameters.getHelpManagerFlag);
1187 assertEqualsInt('testParseCmdLine_QuotedTitle_AfterFile', 0, tmpCmdLineParameters.getHelpManagerWindow);
1188 assertEqualsInt('testParseCmdLine_QuotedTitle_AfterFile', 0, tmpCmdLineParameters.getOwnerWindow);
1189 assertEqualsString('testParseCmdLine_QuotedTitle_AfterFile', 'Test Title', tmpCmdLineParameters.getWindowTitle);
1190 assertEqualsString('testParseCmdLine_QuotedTitle_AfterFile', 'cmdref', tmpCmdLineParameters.getFileNames(true));
1191 assertEqualsString('testParseCmdLine_QuotedTitle_AfterFile', 'cmdref', tmpCmdLineParameters.getFileNames(false));
1192 assertEqualsString('testParseCmdLine_QuotedTitle_AfterFile', '', tmpCmdLineParameters.getSearchText);
1193 END;
1194
1195
1196 PROCEDURE testParseCmdLine_Title_between;
1197 VAR
1198 tmpCmdLineString : String;
1199 tmpCmdLineParameters : TCmdLineParameters;
1200 BEGIN
1201 tmpCmdLineString := '-h-TITLE:tItlE-s';
1202 tmpCmdLineParameters := TCmdLineParameters.Create;
1203 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1204
1205 assertTrue('testParseCmdLine_Title_between', tmpCmdLineParameters.getShowUsageFlag);
1206 assertTrue('testParseCmdLine_Title_between', tmpCmdLineParameters.getSearchFlag);
1207 assertFalse('testParseCmdLine_Title_between', tmpCmdLineParameters.getGlobalSearchFlag);
1208 assertEqualsString('testParseCmdLine_Title_between', '', tmpCmdLineParameters.getLanguage);
1209 assertFalse('testParseCmdLine_Title_between', tmpCmdLineParameters.getHelpManagerFlag);
1210 assertEqualsInt('testParseCmdLine_Title_between', 0, tmpCmdLineParameters.getHelpManagerWindow);
1211 assertEqualsInt('testParseCmdLine_Title_between', 0, tmpCmdLineParameters.getOwnerWindow);
1212 assertEqualsString('testParseCmdLine_Title_between', 'tItlE', tmpCmdLineParameters.getWindowTitle);
1213 assertEqualsString('testParseCmdLine_Title_between', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
1214 assertEqualsString('testParseCmdLine_Title_between', '', tmpCmdLineParameters.getFileNames(false));
1215 assertEqualsString('testParseCmdLine_Title_between', '', tmpCmdLineParameters.getSearchText);
1216 END;
1217
1218
1219 PROCEDURE testParseCmdLine_Title_between_withSpace;
1220 VAR
1221 tmpCmdLineString : String;
1222 tmpCmdLineParameters : TCmdLineParameters;
1223 BEGIN
1224 tmpCmdLineString := '-h-TITLE:tItlE-s';
1225 tmpCmdLineParameters := TCmdLineParameters.Create;
1226 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1227
1228 assertTrue('testParseCmdLine_Title_between_withSpace', tmpCmdLineParameters.getShowUsageFlag);
1229 assertTrue('testParseCmdLine_Title_between_withSpace', tmpCmdLineParameters.getSearchFlag);
1230 assertFalse('testParseCmdLine_Title_between_withSpace', tmpCmdLineParameters.getGlobalSearchFlag);
1231 assertEqualsString('testParseCmdLine_Title_between_withSpace', '', tmpCmdLineParameters.getLanguage);
1232 assertFalse('testParseCmdLine_Title_between_withSpace', tmpCmdLineParameters.getHelpManagerFlag);
1233 assertEqualsInt('testParseCmdLine_Title_between_withSpace', 0, tmpCmdLineParameters.getHelpManagerWindow);
1234 assertEqualsInt('testParseCmdLine_Title_between_withSpace', 0, tmpCmdLineParameters.getOwnerWindow);
1235 assertEqualsString('testParseCmdLine_Title_between_withSpace', 'tItlE', tmpCmdLineParameters.getWindowTitle);
1236 assertEqualsString('testParseCmdLine_Title_between_withSpace', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
1237 assertEqualsString('testParseCmdLine_Title_between_withSpace', '', tmpCmdLineParameters.getFileNames(false));
1238 assertEqualsString('testParseCmdLine_Title_between_withSpace', '', tmpCmdLineParameters.getSearchText);
1239 END;
1240
1241
1242 // can't test start profile
1243
1244 PROCEDURE testParseCmdLine_WindowPos;
1245 VAR
1246 tmpCmdLineString : String;
1247 tmpCmdLineParameters : TCmdLineParameters;
1248 tmpWindowPosition : TWindowPosition;
1249 BEGIN
1250 tmpCmdLineString := '-pos:20,40,60,80';
1251 tmpCmdLineParameters := TCmdLineParameters.Create;
1252 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1253
1254 assertFalse('testParseCmdLine_WindowPos', tmpCmdLineParameters.getShowUsageFlag);
1255 assertFalse('testParseCmdLine_WindowPos', tmpCmdLineParameters.getSearchFlag);
1256 assertFalse('testParseCmdLine_WindowPos', tmpCmdLineParameters.getGlobalSearchFlag);
1257 assertEqualsString('testParseCmdLine_WindowPos', '', tmpCmdLineParameters.getLanguage);
1258 assertFalse('testParseCmdLine_WindowPos', tmpCmdLineParameters.getHelpManagerFlag);
1259 assertEqualsInt('testParseCmdLine_WindowPos', 0, tmpCmdLineParameters.getHelpManagerWindow);
1260 assertEqualsInt('testParseCmdLine_WindowPos', 0, tmpCmdLineParameters.getOwnerWindow);
1261 assertEqualsString('testParseCmdLine_WindowPos', '', tmpCmdLineParameters.getWindowTitle);
1262 assertEqualsString('testParseCmdLine_WindowPos', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
1263 assertEqualsString('testParseCmdLine_WindowPos', '', tmpCmdLineParameters.getFileNames(false));
1264 assertEqualsString('testParseCmdLine_WindowPos', '', tmpCmdLineParameters.getSearchText);
1265
1266 assertTrue('testParseCmdLine_WindowPos', tmpCmdLineParameters.getWindowPositionFlag);
1267 tmpWindowPosition := tmpCmdLineParameters.getWindowPosition;
1268 assertEqualsInt('testParseCmdLine_WindowPos', 20, tmpWindowPosition.left);
1269 assertEqualsInt('testParseCmdLine_WindowPos', 40, tmpWindowPosition.bottom);
1270 assertEqualsInt('testParseCmdLine_WindowPos', 60, tmpWindowPosition.width);
1271 assertEqualsInt('testParseCmdLine_WindowPos', 80, tmpWindowPosition.height);
1272 END;
1273
1274
1275
1276 PROCEDURE testParseCmdLine_WindowPosPercentage;
1277 VAR
1278 tmpCmdLineString : String;
1279 tmpCmdLineParameters : TCmdLineParameters;
1280 tmpWindowPosition : TWindowPosition;
1281 BEGIN
1282 tmpCmdLineString := '-pos:100p,100p,50p,50p';
1283 tmpCmdLineParameters := TCmdLineParameters.Create;
1284 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1285
1286 assertFalse('testParseCmdLine_WindowPosPercentage', tmpCmdLineParameters.getShowUsageFlag);
1287 assertFalse('testParseCmdLine_WindowPosPercentage', tmpCmdLineParameters.getSearchFlag);
1288 assertFalse('testParseCmdLine_WindowPosPercentage', tmpCmdLineParameters.getGlobalSearchFlag);
1289 assertEqualsString('testParseCmdLine_WindowPos', '', tmpCmdLineParameters.getLanguage);
1290 assertFalse('testParseCmdLine_WindowPosPercentage', tmpCmdLineParameters.getHelpManagerFlag);
1291 assertEqualsInt('testParseCmdLine_WindowPosPercentage', 0, tmpCmdLineParameters.getHelpManagerWindow);
1292 assertEqualsInt('testParseCmdLine_WindowPosPercentage', 0, tmpCmdLineParameters.getOwnerWindow);
1293 assertEqualsString('testParseCmdLine_WindowPosPercentage', '', tmpCmdLineParameters.getWindowTitle);
1294 assertEqualsString('testParseCmdLine_WindowPosPercentage', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
1295 assertEqualsString('testParseCmdLine_WindowPosPercentage', '', tmpCmdLineParameters.getFileNames(false));
1296 assertEqualsString('testParseCmdLine_WindowPosPercentage', '', tmpCmdLineParameters.getSearchText);
1297
1298 assertTrue('testParseCmdLine_WindowPosPercentage', tmpCmdLineParameters.getWindowPositionFlag);
1299 tmpWindowPosition := tmpCmdLineParameters.getWindowPosition;
1300 assertEqualsInt('testParseCmdLine_WindowPosPercentage', 1600, tmpWindowPosition.left);
1301 assertEqualsInt('testParseCmdLine_WindowPosPercentage', 1200, tmpWindowPosition.bottom);
1302 assertEqualsInt('testParseCmdLine_WindowPosPercentage', 800, tmpWindowPosition.width);
1303 assertEqualsInt('testParseCmdLine_WindowPosPercentage', 600, tmpWindowPosition.height);
1304 END;
1305
1306
1307 PROCEDURE testParseCmdLine_Topic;
1308 VAR
1309 tmpCmdLineString : String;
1310 tmpCmdLineParameters : TCmdLineParameters;
1311 BEGIN
1312 tmpCmdLineString := 'file topi1 topi2';
1313 tmpCmdLineParameters := TCmdLineParameters.Create;
1314 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1315
1316 assertFalse('testParseCmdLine_Topic->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1317 assertFalse('testParseCmdLine_Topic->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1318 assertFalse('testParseCmdLine_Topic->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1319 assertEqualsString('testParseCmdLine_Topic', '', tmpCmdLineParameters.getLanguage);
1320 assertFalse('testParseCmdLine_Topic', tmpCmdLineParameters.getHelpManagerFlag);
1321 assertEqualsInt('testParseCmdLine_Topic', 0, tmpCmdLineParameters.getHelpManagerWindow);
1322 assertEqualsInt('testParseCmdLine_Topic', 0, tmpCmdLineParameters.getOwnerWindow);
1323 assertEqualsString('testParseCmdLine_Topic', '', tmpCmdLineParameters.getWindowTitle);
1324 assertEqualsString('testParseCmdLine_Topic', 'file', tmpCmdLineParameters.getFileNames(true));
1325 assertEqualsString('testParseCmdLine_Topic', 'file', tmpCmdLineParameters.getFileNames(false));
1326 assertEqualsString('testParseCmdLine_Topic', 'topi1 topi2', tmpCmdLineParameters.getSearchText);
1327 END;
1328
1329
1330 PROCEDURE testParseCmdLine_QuotedTopic;
1331 VAR
1332 tmpCmdLineString : String;
1333 tmpCmdLineParameters : TCmdLineParameters;
1334 BEGIN
1335 tmpCmdLineString := 'file "topi1"';
1336 tmpCmdLineParameters := TCmdLineParameters.Create;
1337 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1338
1339 assertFalse('testParseCmdLine_QuotedTopic->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1340 assertFalse('testParseCmdLine_QuotedTopic->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1341 assertFalse('testParseCmdLine_QuotedTopic->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1342 assertEqualsString('testParseCmdLine_QuotedTopic', '', tmpCmdLineParameters.getLanguage);
1343 assertFalse('testParseCmdLine_QuotedTopic', tmpCmdLineParameters.getHelpManagerFlag);
1344 assertEqualsInt('testParseCmdLine_QuotedTopic', 0, tmpCmdLineParameters.getHelpManagerWindow);
1345 assertEqualsInt('testParseCmdLine_QuotedTopic', 0, tmpCmdLineParameters.getOwnerWindow);
1346 assertEqualsString('testParseCmdLine_QuotedTopic', '', tmpCmdLineParameters.getWindowTitle);
1347 assertEqualsString('testParseCmdLine_QuotedTopic', 'file', tmpCmdLineParameters.getFileNames(true));
1348 assertEqualsString('testParseCmdLine_QuotedTopic', 'file', tmpCmdLineParameters.getFileNames(false));
1349 assertEqualsString('testParseCmdLine_QuotedTopic', 'topi1', tmpCmdLineParameters.getSearchText);
1350 END;
1351
1352
1353 PROCEDURE testParseCmdLine_file;
1354 VAR
1355 tmpCmdLineString : String;
1356 tmpCmdLineParameters : TCmdLineParameters;
1357 BEGIN
1358 tmpCmdLineString := 'file';
1359 tmpCmdLineParameters := TCmdLineParameters.Create;
1360 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1361
1362 assertFalse('testParseCmdLine_file->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1363 assertFalse('testParseCmdLine_file->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1364 assertFalse('testParseCmdLine_file->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1365 assertEqualsString('testParseCmdLine_file', '', tmpCmdLineParameters.getLanguage);
1366 assertFalse('testParseCmdLine_file', tmpCmdLineParameters.getHelpManagerFlag);
1367 assertEqualsInt('testParseCmdLine_file', 0, tmpCmdLineParameters.getHelpManagerWindow);
1368 assertEqualsInt('testParseCmdLine_file', 0, tmpCmdLineParameters.getOwnerWindow);
1369 assertEqualsString('testParseCmdLine_file', '', tmpCmdLineParameters.getWindowTitle);
1370 assertEqualsString('testParseCmdLine_file', 'file', tmpCmdLineParameters.getFileNames(true));
1371 assertEqualsString('testParseCmdLine_file', 'file', tmpCmdLineParameters.getFileNames(false));
1372 assertEqualsString('testParseCmdLine_file', '', tmpCmdLineParameters.getSearchText);
1373 END;
1374
1375
1376 PROCEDURE testParseCmdLine_fileLeadingBlanks;
1377 VAR
1378 tmpCmdLineString : String;
1379 tmpCmdLineParameters : TCmdLineParameters;
1380 BEGIN
1381 tmpCmdLineString := ' file';
1382 tmpCmdLineParameters := TCmdLineParameters.Create;
1383 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1384
1385 assertFalse('testParseCmdLine_fileLeadingBlanks->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1386 assertFalse('testParseCmdLine_fileLeadingBlanks->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1387 assertFalse('testParseCmdLine_fileLeadingBlanks->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1388 assertEqualsString('testParseCmdLine_fileLeadingBlanks', '', tmpCmdLineParameters.getLanguage);
1389 assertFalse('testParseCmdLine_fileLeadingBlanks', tmpCmdLineParameters.getHelpManagerFlag);
1390 assertEqualsInt('testParseCmdLine_fileLeadingBlanks', 0, tmpCmdLineParameters.getHelpManagerWindow);
1391 assertEqualsInt('testParseCmdLine_fileLeadingBlanks', 0, tmpCmdLineParameters.getOwnerWindow);
1392 assertEqualsString('testParseCmdLine_fileLeadingBlanks', '', tmpCmdLineParameters.getWindowTitle);
1393 assertEqualsString('testParseCmdLine_fileLeadingBlanks', 'file', tmpCmdLineParameters.getFileNames(true));
1394 assertEqualsString('testParseCmdLine_fileLeadingBlanks', 'file', tmpCmdLineParameters.getFileNames(false));
1395 assertEqualsString('testParseCmdLine_fileLeadingBlanks', '', tmpCmdLineParameters.getSearchText);
1396 END;
1397
1398
1399 PROCEDURE testParseCmdLine_fileTrailingBlanks;
1400 VAR
1401 tmpCmdLineString : String;
1402 tmpCmdLineParameters : TCmdLineParameters;
1403 BEGIN
1404 tmpCmdLineString := 'file ';
1405 tmpCmdLineParameters := TCmdLineParameters.Create;
1406 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1407
1408 assertFalse('testParseCmdLine_fileTrailingBlanks->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1409 assertFalse('testParseCmdLine_fileTrailingBlanks->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1410 assertFalse('testParseCmdLine_fileTrailingBlanks->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1411 assertEqualsString('testParseCmdLine_fileTrailingBlanks', '', tmpCmdLineParameters.getLanguage);
1412 assertFalse('testParseCmdLine_fileTrailingBlanks', tmpCmdLineParameters.getHelpManagerFlag);
1413 assertEqualsInt('testParseCmdLine_fileTrailingBlanks', 0, tmpCmdLineParameters.getHelpManagerWindow);
1414 assertEqualsInt('testParseCmdLine_fileTrailingBlanks', 0, tmpCmdLineParameters.getOwnerWindow);
1415 assertEqualsString('testParseCmdLine_fileTrailingBlanks', '', tmpCmdLineParameters.getWindowTitle);
1416 assertEqualsString('testParseCmdLine_fileTrailingBlanks', 'file', tmpCmdLineParameters.getFileNames(true));
1417 assertEqualsString('testParseCmdLine_fileTrailingBlanks', 'file', tmpCmdLineParameters.getFileNames(false));
1418 assertEqualsString('testParseCmdLine_fileTrailingBlanks', '', tmpCmdLineParameters.getSearchText);
1419 END;
1420
1421
1422 PROCEDURE testParseCmdLine_fileQuoted;
1423 VAR
1424 tmpCmdLineString : String;
1425 tmpCmdLineParameters : TCmdLineParameters;
1426 BEGIN
1427 tmpCmdLineString := '"fi -h le"';
1428 tmpCmdLineParameters := TCmdLineParameters.Create;
1429 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1430
1431 assertFalse('testParseCmdLine_fileQuoted->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1432 assertFalse('testParseCmdLine_fileQuoted->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1433 assertFalse('testParseCmdLine_fileQuoted->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1434 assertEqualsString('testParseCmdLine_fileQuoted', '', tmpCmdLineParameters.getLanguage);
1435 assertFalse('testParseCmdLine_fileQuoted', tmpCmdLineParameters.getHelpManagerFlag);
1436 assertEqualsInt('testParseCmdLine_fileQuoted', 0, tmpCmdLineParameters.getHelpManagerWindow);
1437 assertEqualsInt('testParseCmdLine_fileQuoted', 0, tmpCmdLineParameters.getOwnerWindow);
1438 assertEqualsString('testParseCmdLine_fileQuoted', '', tmpCmdLineParameters.getWindowTitle);
1439 assertEqualsString('testParseCmdLine_fileQuoted', 'fi -h le', tmpCmdLineParameters.getFileNames(true));
1440 assertEqualsString('testParseCmdLine_fileQuoted', 'fi -h le', tmpCmdLineParameters.getFileNames(false));
1441 assertEqualsString('testParseCmdLine_fileQuoted', '', tmpCmdLineParameters.getSearchText);
1442 END;
1443
1444
1445 PROCEDURE testParseCmdLine_fileQuotedMissingClosedQuote;
1446 VAR
1447 tmpCmdLineString : String;
1448 tmpCmdLineParameters : TCmdLineParameters;
1449 BEGIN
1450 tmpCmdLineString := '"fi -h le';
1451 tmpCmdLineParameters := TCmdLineParameters.Create;
1452 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1453
1454 assertFalse('testParseCmdLine_fileQuotedMissingClosedQuote->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1455 assertFalse('testParseCmdLine_fileQuotedMissingClosedQuote->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1456 assertFalse('testParseCmdLine_fileQuotedMissingClosedQuote->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1457 assertEqualsString('testParseCmdLine_fileQuotedMissingClosedQuote', '', tmpCmdLineParameters.getLanguage);
1458 assertFalse('testParseCmdLine_fileQuotedMissingClosedQuote', tmpCmdLineParameters.getHelpManagerFlag);
1459 assertEqualsInt('testParseCmdLine_fileQuotedMissingClosedQuote', 0, tmpCmdLineParameters.getHelpManagerWindow);
1460 assertEqualsInt('testParseCmdLine_fileQuotedMissingClosedQuote', 0, tmpCmdLineParameters.getOwnerWindow);
1461 assertEqualsString('testParseCmdLine_fileQuotedMissingClosedQuote', '', tmpCmdLineParameters.getWindowTitle);
1462 assertEqualsString('testParseCmdLine_fileQuotedMissingClosedQuote', 'fi -h le', tmpCmdLineParameters.getFileNames(true));
1463 assertEqualsString('testParseCmdLine_fileQuotedMissingClosedQuote', 'fi -h le', tmpCmdLineParameters.getFileNames(false));
1464 assertEqualsString('testParseCmdLine_fileQuotedMissingClosedQuote', '', tmpCmdLineParameters.getSearchText);
1465 END;
1466
1467
1468 PROCEDURE testParseCmdLine_fileQuotedAndText;
1469 VAR
1470 tmpCmdLineString : String;
1471 tmpCmdLineParameters : TCmdLineParameters;
1472 BEGIN
1473 tmpCmdLineString := '"fi -h le" searchText';
1474 tmpCmdLineParameters := TCmdLineParameters.Create;
1475 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1476
1477 assertFalse('testParseCmdLine_fileQuotedAndText->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1478 assertFalse('testParseCmdLine_fileQuotedAndText->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1479 assertFalse('testParseCmdLine_fileQuotedAndText->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1480 assertEqualsString('testParseCmdLine_fileQuotedAndText', '', tmpCmdLineParameters.getLanguage);
1481 assertFalse('testParseCmdLine_fileQuotedAndText', tmpCmdLineParameters.getHelpManagerFlag);
1482 assertEqualsInt('testParseCmdLine_fileQuotedAndText', 0, tmpCmdLineParameters.getHelpManagerWindow);
1483 assertEqualsInt('testParseCmdLine_fileQuotedAndText', 0, tmpCmdLineParameters.getOwnerWindow);
1484 assertEqualsString('testParseCmdLine_fileQuotedAndText', '', tmpCmdLineParameters.getWindowTitle);
1485 assertEqualsString('testParseCmdLine_fileQuotedAndText', 'fi -h le', tmpCmdLineParameters.getFileNames(true));
1486 assertEqualsString('testParseCmdLine_fileQuotedAndText', 'fi -h le', tmpCmdLineParameters.getFileNames(false));
1487 assertEqualsString('testParseCmdLine_fileQuotedAndText', 'searchText', tmpCmdLineParameters.getSearchText);
1488 END;
1489
1490
1491 PROCEDURE testParseCmdLine_fileQuotedAndTextManyBlanks;
1492 VAR
1493 tmpCmdLineString : String;
1494 tmpCmdLineParameters : TCmdLineParameters;
1495 BEGIN
1496 tmpCmdLineString := '"fi -h le" searchText ';
1497 tmpCmdLineParameters := TCmdLineParameters.Create;
1498 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1499
1500 assertFalse('testParseCmdLine_fileQuotedAndTextManyBlanks->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1501 assertFalse('testParseCmdLine_fileQuotedAndTextManyBlanks->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1502 assertFalse('testParseCmdLine_fileQuotedAndTextManyBlanks->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1503 assertEqualsString('testParseCmdLine_fileQuotedAndTextManyBlanks', '', tmpCmdLineParameters.getLanguage);
1504 assertFalse('testParseCmdLine_fileQuotedAndTextManyBlanks', tmpCmdLineParameters.getHelpManagerFlag);
1505 assertEqualsInt('testParseCmdLine_fileQuotedAndTextManyBlanks', 0, tmpCmdLineParameters.getHelpManagerWindow);
1506 assertEqualsInt('testParseCmdLine_fileQuotedAndTextManyBlanks', 0, tmpCmdLineParameters.getOwnerWindow);
1507 assertEqualsString('testParseCmdLine_fileQuotedAndTextManyBlanks', '', tmpCmdLineParameters.getWindowTitle);
1508 assertEqualsString('testParseCmdLine_fileQuotedAndTextManyBlanks', 'fi -h le', tmpCmdLineParameters.getFileNames(true));
1509 assertEqualsString('testParseCmdLine_fileQuotedAndTextManyBlanks', 'fi -h le', tmpCmdLineParameters.getFileNames(false));
1510 assertEqualsString('testParseCmdLine_fileQuotedAndTextManyBlanks', 'searchText', tmpCmdLineParameters.getSearchText);
1511 END;
1512
1513
1514 PROCEDURE testParseCmdLine_fileQuotedInside;
1515 VAR
1516 tmpCmdLineString : String;
1517 tmpCmdLineParameters : TCmdLineParameters;
1518 BEGIN
1519 tmpCmdLineString := 'test"fi -h le"tes searchText';
1520 tmpCmdLineParameters := TCmdLineParameters.Create;
1521 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1522
1523 assertFalse('testParseCmdLine_fileQuotedInside->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1524 assertFalse('testParseCmdLine_fileQuotedInside->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1525 assertFalse('testParseCmdLine_fileQuotedInside->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1526 assertEqualsString('testParseCmdLine_fileQuotedInside', '', tmpCmdLineParameters.getLanguage);
1527 assertFalse('testParseCmdLine_fileQuotedInside', tmpCmdLineParameters.getHelpManagerFlag);
1528 assertEqualsInt('testParseCmdLine_fileQuotedInside', 0, tmpCmdLineParameters.getHelpManagerWindow);
1529 assertEqualsInt('testParseCmdLine_fileQuotedInside', 0, tmpCmdLineParameters.getOwnerWindow);
1530 assertEqualsString('testParseCmdLine_fileQuotedInside', '', tmpCmdLineParameters.getWindowTitle);
1531 assertEqualsString('testParseCmdLine_fileQuotedInside', 'testfi -h letes', tmpCmdLineParameters.getFileNames(true));
1532 assertEqualsString('testParseCmdLine_fileQuotedInside', 'testfi -h letes', tmpCmdLineParameters.getFileNames(false));
1533 assertEqualsString('testParseCmdLine_fileQuotedInside', 'searchText', tmpCmdLineParameters.getSearchText);
1534 END;
1535
1536
1537 PROCEDURE testParseCmdLine_SwitchAndFileQuoted;
1538 VAR
1539 tmpCmdLineString : String;
1540 tmpCmdLineParameters : TCmdLineParameters;
1541 BEGIN
1542 tmpCmdLineString := '-s "fi -h le" searchText';
1543 tmpCmdLineParameters := TCmdLineParameters.Create;
1544 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1545
1546 assertFalse('testParseCmdLine_SwitchAndFileQuoted->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1547 assertTrue('testParseCmdLine_SwitchAndFileQuoted->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1548 assertFalse('testParseCmdLine_SwitchAndFileQuoted->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1549 assertEqualsString('testParseCmdLine_SwitchAndFileQuoted', '', tmpCmdLineParameters.getLanguage);
1550 assertFalse('testParseCmdLine_SwitchAndFileQuoted', tmpCmdLineParameters.getHelpManagerFlag);
1551 assertEqualsInt('testParseCmdLine_SwitchAndFileQuoted', 0, tmpCmdLineParameters.getHelpManagerWindow);
1552 assertEqualsInt('testParseCmdLine_SwitchAndFileQuoted', 0, tmpCmdLineParameters.getOwnerWindow);
1553 assertEqualsString('testParseCmdLine_SwitchAndFileQuoted', '', tmpCmdLineParameters.getWindowTitle);
1554 assertEqualsString('testParseCmdLine_SwitchAndFileQuoted', 'fi -h le', tmpCmdLineParameters.getFileNames(true));
1555 assertEqualsString('testParseCmdLine_SwitchAndFileQuoted', 'fi -h le', tmpCmdLineParameters.getFileNames(false));
1556 assertEqualsString('testParseCmdLine_SwitchAndFileQuoted', 'searchText', tmpCmdLineParameters.getSearchText);
1557 END;
1558
1559
1560 PROCEDURE testParseCmdLine_SwitchAndFileAndTextQuoted;
1561 VAR
1562 tmpCmdLineString : String;
1563 tmpCmdLineParameters : TCmdLineParameters;
1564 BEGIN
1565 tmpCmdLineString := '-s file "search text"';
1566 tmpCmdLineParameters := TCmdLineParameters.Create;
1567 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1568
1569 assertFalse('testParseCmdLine_SwitchAndFileAndTextQuoted->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1570 assertTrue('testParseCmdLine_SwitchAndFileAndTextQuoted->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1571 assertFalse('testParseCmdLine_SwitchAndFileAndTextQuoted->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1572 assertEqualsString('testParseCmdLine_SwitchAndFileAndTextQuoted', '', tmpCmdLineParameters.getLanguage);
1573 assertFalse('testParseCmdLine_SwitchAndFileAndTextQuoted', tmpCmdLineParameters.getHelpManagerFlag);
1574 assertEqualsInt('testParseCmdLine_SwitchAndFileAndTextQuoted', 0, tmpCmdLineParameters.getHelpManagerWindow);
1575 assertEqualsInt('testParseCmdLine_SwitchAndFileAndTextQuoted', 0, tmpCmdLineParameters.getOwnerWindow);
1576 assertEqualsString('testParseCmdLine_SwitchAndFileAndTextQuoted', '', tmpCmdLineParameters.getWindowTitle);
1577 assertEqualsString('testParseCmdLine_SwitchAndFileAndTextQuoted', 'file', tmpCmdLineParameters.getFileNames(true));
1578 assertEqualsString('testParseCmdLine_SwitchAndFileAndTextQuoted', 'file', tmpCmdLineParameters.getFileNames(false));
1579 assertEqualsString('testParseCmdLine_SwitchAndFileAndTextQuoted', '"search text"', tmpCmdLineParameters.getSearchText);
1580 END;
1581
1582
1583 PROCEDURE testParseCmdLine_ReallyLong;
1584 VAR
1585 tmpCmdLineString : AnsiString;
1586 tmpCmdLineParameters : TCmdLineParameters;
1587 i : integer;
1588 BEGIN
1589 tmpCmdLineString := '-s ';
1590
1591 // long file name
1592 tmpCmdLineString := tmpCmdLineString + 'LongFileName';
1593 for i := 1 to 30 do
1594 begin
1595 tmpCmdLineString := tmpCmdLineString + '0123456789';
1596 end;
1597
1598 // long search text
1599 tmpCmdLineString := tmpCmdLineString + ' LongSearchText';
1600 for i := 1 to 30 do
1601 begin
1602 tmpCmdLineString := tmpCmdLineString + '0123456789';
1603 end;
1604
1605 tmpCmdLineParameters := TCmdLineParameters.Create;
1606 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1607
1608 assertFalse('testParseCmdLine_ReallyLong->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1609 assertTrue('testParseCmdLine_ReallyLong->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1610 assertFalse('testParseCmdLine_ReallyLong->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1611 assertEqualsString('testParseCmdLine_ReallyLong', '', tmpCmdLineParameters.getLanguage);
1612 assertFalse('testParseCmdLine_ReallyLong', tmpCmdLineParameters.getHelpManagerFlag);
1613 assertEqualsInt('testParseCmdLine_ReallyLong', 0, tmpCmdLineParameters.getHelpManagerWindow);
1614 assertEqualsInt('testParseCmdLine_ReallyLong', 0, tmpCmdLineParameters.getOwnerWindow);
1615 assertEqualsString('testParseCmdLine_ReallyLong', '', tmpCmdLineParameters.getWindowTitle);
1616
1617 assertEqualsInt('testParseCmdLine_ReallyLong', 312, Length(tmpCmdLineParameters.getFileNames(true)));
1618 assertEqualsInt('testParseCmdLine_ReallyLong', 312, Length(tmpCmdLineParameters.getFileNames(false)));
1619 assertEqualsInt('testParseCmdLine_ReallyLong', 314, Length(tmpCmdLineParameters.getSearchText));
1620 END;
1621
1622
1623
1624 // ----------------------------------------------------------
1625
1626
1627 FUNCTION getCmdLineParameterUnitTests : TList;
1628 BEGIN
1629 result := TList.Create;
1630
1631 result.add(@testParseCmdLine_Empty);
1632
1633 result.add(@testParseCmdLine_QuestionMark);
1634 result.add(@testParseCmdLine_QuotedQuestionMark);
1635 result.add(@testParseCmdLine_lowerH);
1636 result.add(@testParseCmdLine_upperH);
1637 result.add(@testParseCmdLine_lowerHelp);
1638 result.add(@testParseCmdLine_upperHELP);
1639 result.add(@testParseCmdLine_upperHE);
1640 result.add(@testParseCmdLine_h_between);
1641 result.add(@testParseCmdLine_h_between_withSpace);
1642
1643 result.add(@testParseCmdLine_lowerS);
1644 result.add(@testParseCmdLine_upperS);
1645 result.add(@testParseCmdLine_upperS_withBlank);
1646 result.add(@testParseCmdLine_QuotedS);
1647 result.add(@testParseCmdLine_emptyS);
1648
1649 result.add(@testParseCmdLine_s_between);
1650 result.add(@testParseCmdLine_s_between_withSpace);
1651 result.add(@testParseCmdLine_help_and_s);
1652 result.add(@testParseCmdLine_s_and_help);
1653 result.add(@testParseCmdLine_help_and_s_without_blank);
1654
1655 result.add(@testParseCmdLine_lowerG);
1656 result.add(@testParseCmdLine_upperG);
1657 result.add(@testParseCmdLine_QuotedG);
1658 result.add(@testParseCmdLine_emptyG);
1659 result.add(@testParseCmdLine_g_between);
1660 result.add(@testParseCmdLine_g_between_withSpace);
1661
1662 result.add(@testParseCmdLine_Language);
1663
1664 result.add(@testParseCmdLine_Language_Empty);
1665 result.add(@testParseCmdLine_Language_Empty_WithColon);
1666 result.add(@testParseCmdLine_Language_WithFile);
1667 result.add(@testParseCmdLine_QuotedLanguage);
1668 result.add(@testParseCmdLine_QuotedLanguage2);
1669 result.add(@testParseCmdLine_Language_between);
1670 result.add(@testParseCmdLine_Language_between_withSpace);
1671
1672 result.add(@testParseCmdLine_HelpManagerNumber);
1673 result.add(@testParseCmdLine_HelpManagerBigNumber);
1674 result.add(@testParseCmdLine_HelpManagerNumber_WithoutColon);
1675 result.add(@testParseCmdLine_HelpManagerNumber_Invalid);
1676 result.add(@testParseCmdLine_HelpManagerNumber_between);
1677 result.add(@testParseCmdLine_HelpManagerNumber_between_withSpace);
1678
1679 result.add(@testParseCmdLine_OwnerNumber);
1680 result.add(@testParseCmdLine_OwnerNumber_WithoutColon);
1681 result.add(@testParseCmdLine_OwnerNumber_Invalid);
1682 result.add(@testParseCmdLine_OwnerNumber_between);
1683 result.add(@testParseCmdLine_OwnerNumber_between_withSpace);
1684
1685
1686 result.add(@testParseCmdLine_Title);
1687 result.add(@testParseCmdLine_Title_WithoutColon);
1688 result.add(@testParseCmdLine_Title_Empty);
1689 result.add(@testParseCmdLine_QuotedTitle);
1690 result.add(@testParseCmdLine_QuotedTitle2);
1691 result.add(@testParseCmdLine_QuotedTitle_AfterFile);
1692 result.add(@testParseCmdLine_Title_between);
1693 result.add(@testParseCmdLine_Title_between_withSpace);
1694
1695 result.add(@testParseCmdLine_WindowPos);
1696 result.add(@testParseCmdLine_WindowPosPercentage);
1697
1698 result.add(@testParseCmdLine_Topic);
1699 result.add(@testParseCmdLine_QuotedTopic);
1700
1701 result.add(@testParseCmdLine_file);
1702 result.add(@testParseCmdLine_fileLeadingBlanks);
1703 result.add(@testParseCmdLine_fileTrailingBlanks);
1704 result.add(@testParseCmdLine_fileQuoted);
1705 result.add(@testParseCmdLine_fileQuotedMissingClosedQuote);
1706 result.add(@testParseCmdLine_fileQuotedAndText);
1707 result.add(@testParseCmdLine_fileQuotedAndTextManyBlanks);
1708 result.add(@testParseCmdLine_fileQuotedInside);
1709
1710 result.add(@testParseCmdLine_SwitchAndFileQuoted);
1711 result.add(@testParseCmdLine_SwitchAndFileAndTextQuoted);
1712
1713 result.add(@testParseCmdLine_ReallyLong);
1714
1715 END;
1716
1717END.
Note: See TracBrowser for help on using the repository browser.