source: trunk/NewView/unittests/CmdLineParameterUnitTests.pas@ 145

Last change on this file since 145 was 128, checked in by RBRi, 19 years ago

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