183 AddFileLog('Prefix: "' + PathPrefix +'"'); |
183 AddFileLog('Prefix: "' + PathPrefix +'"'); |
184 for i:= 0 to ParamCount do |
184 for i:= 0 to ParamCount do |
185 AddFileLog(inttostr(i) + ': ' + ParamStr(i)); |
185 AddFileLog(inttostr(i) + ': ' + ParamStr(i)); |
186 {$ENDIF} |
186 {$ENDIF} |
187 case ParamCount of |
187 case ParamCount of |
188 7: begin |
188 8: begin |
189 val(ParamStr(1), cScreenWidth, c); |
189 val(ParamStr(1), cScreenWidth, c); |
190 val(ParamStr(2), cScreenHeight, c); |
190 val(ParamStr(2), cScreenHeight, c); |
191 cBitsStr:= ParamStr(3); |
191 cBitsStr:= ParamStr(3); |
192 val(cBitsStr, cBits, c); |
192 val(cBitsStr, cBits, c); |
193 val(ParamStr(4), ipcPort, c); |
193 val(ParamStr(4), ipcPort, c); |
194 cFullScreen:= ParamStr(5) = '1'; |
194 cFullScreen:= ParamStr(5) = '1'; |
195 isSoundEnabled:= ParamStr(6) = '1'; |
195 isSoundEnabled:= ParamStr(6) = '1'; |
196 cLocaleFName:= ParamStr(7); |
196 cLocaleFName:= ParamStr(7); |
|
197 val(ParamStr(8), cInitVolume, c); |
197 end; |
198 end; |
198 2: begin |
199 2: begin |
199 val(ParamStr(1), ipcPort, c); |
200 val(ParamStr(1), ipcPort, c); |
200 GameType:= gmtLandPreview; |
201 GameType:= gmtLandPreview; |
201 if ParamStr(2) <> 'landpreview' then OutError(errmsgShouldntRun, true); |
202 if ParamStr(2) <> 'landpreview' then OutError(errmsgShouldntRun, true); |