76     cAVFormat:= ParamStr(21);

    76     cAVFormat:= ParamStr(21);

    77     cVideoCodec:= ParamStr(22);

    77     cVideoCodec:= ParamStr(22);

    78     cVideoQuality:= StrToInt(ParamStr(23));

    78     cVideoQuality:= StrToInt(ParamStr(23));

    79     cVideoPreset:= ParamStr(24);

    79     cVideoPreset:= ParamStr(24);

    80     cAudioCodec:= ParamStr(25);

    80     cAudioCodec:= ParamStr(25);

    82     cAudioQuality:= StrToInt(ParamStr(26));

    81     cAudioQuality:= StrToInt(ParamStr(26));

    83 end;

    82 end;

    84 {$ENDIF}

    83 {$ENDIF}

    85 

    84 

    86 procedure setVideo(screenWidth: LongInt; screenHeight: LongInt; bitsStr: LongInt);

    85 procedure setVideo(screenWidth: LongInt; screenHeight: LongInt; bitsStr: LongInt);