equal
deleted
inserted
replaced
157 UserPathPrefix:= ParamStr(1); |
157 UserPathPrefix:= ParamStr(1); |
158 PathPrefix:= ParamStr(2); |
158 PathPrefix:= ParamStr(2); |
159 recordFileName:= ParamStr(3); |
159 recordFileName:= ParamStr(3); |
160 paramIndex:= 4; |
160 paramIndex:= 4; |
161 wrongParameter:= false; |
161 wrongParameter:= false; |
162 while (paramIndex <= ParamCount) and not wrongParameter do |
162 while (paramIndex <= ParamCount) and (not wrongParameter) do |
163 begin |
163 begin |
164 if ParamStr(paramIndex) = '--set-video' then |
164 if ParamStr(paramIndex) = '--set-video' then |
165 //--set-video [screen width] [screen height] [color dept] |
165 //--set-video [screen width] [screen height] [color dept] |
166 begin |
166 begin |
167 if(ParamCount-paramIndex < 3) then |
167 if(ParamCount-paramIndex < 3) then |