source: trunk/NewView/unittests/cmdlineparameterunittests.pas@ 80

Last change on this file since 80 was 77, checked in by RBRi, 19 years ago

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