source: trunk/unittests/CmdLineParameterUnitTests.pas@ 419

Last change on this file since 419 was 384, checked in by RBRi, 10 years ago

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