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

Last change on this file since 66 was 65, checked in by RBRi, 19 years ago

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