256 |
256 |
257 while (cmdIndex <= High(reallyAll)) and (cmd <> reallyAll[cmdIndex]) do inc(cmdIndex); |
257 while (cmdIndex <= High(reallyAll)) and (cmd <> reallyAll[cmdIndex]) do inc(cmdIndex); |
258 case cmdIndex of |
258 case cmdIndex of |
259 {--prefix} 0 : PathPrefix := getstringParameter (arg, paramIndex, parseParameter); |
259 {--prefix} 0 : PathPrefix := getstringParameter (arg, paramIndex, parseParameter); |
260 {--user-prefix} 1 : UserPathPrefix := getstringParameter (arg, paramIndex, parseParameter); |
260 {--user-prefix} 1 : UserPathPrefix := getstringParameter (arg, paramIndex, parseParameter); |
261 {--locale} 2 : cLocaleFName := getstringParameter (arg, paramIndex, parseParameter); |
261 {--locale} 2 : cLanguageFName := getstringParameter (arg, paramIndex, parseParameter); |
262 {--fullscreen-width} 3 : cFullscreenWidth := max(getLongIntParameter(arg, paramIndex, parseParameter), cMinScreenWidth); |
262 {--fullscreen-width} 3 : cFullscreenWidth := max(getLongIntParameter(arg, paramIndex, parseParameter), cMinScreenWidth); |
263 {--fullscreen-height} 4 : cFullscreenHeight := max(getLongIntParameter(arg, paramIndex, parseParameter), cMinScreenHeight); |
263 {--fullscreen-height} 4 : cFullscreenHeight := max(getLongIntParameter(arg, paramIndex, parseParameter), cMinScreenHeight); |
264 {--width} 5 : cWindowedWidth := max(2 * (getLongIntParameter(arg, paramIndex, parseParameter) div 2), cMinScreenWidth); |
264 {--width} 5 : cWindowedWidth := max(2 * (getLongIntParameter(arg, paramIndex, parseParameter) div 2), cMinScreenWidth); |
265 {--height} 6 : cWindowedHeight := max(2 * (getLongIntParameter(arg, paramIndex, parseParameter) div 2), cMinScreenHeight); |
265 {--height} 6 : cWindowedHeight := max(2 * (getLongIntParameter(arg, paramIndex, parseParameter) div 2), cMinScreenHeight); |
266 {--frame-interval} 7 : cTimerInterval := getLongIntParameter(arg, paramIndex, parseParameter); |
266 {--frame-interval} 7 : cTimerInterval := getLongIntParameter(arg, paramIndex, parseParameter); |