hedgewars/uVideoRec.pas
changeset 12628 c8edce7e5f18
parent 12626 d972b31f8881
child 13231 4028d7f85233
equal deleted inserted replaced
12627:07fdda8c13a2 12628:c8edce7e5f18
    65                   gameTicks: LongWord;
    65                   gameTicks: LongWord;
    66                   CamX, CamY: LongInt;
    66                   CamX, CamY: LongInt;
    67                   zoom: single;
    67                   zoom: single;
    68               end;
    68               end;
    69 
    69 
    70 var YCbCr_Planes: array[0..2] of PByte;
    70 var RGB_Buffer: PByte;
    71     RGB_Buffer: PByte;
       
    72     cameraFile: File of TFrame;
    71     cameraFile: File of TFrame;
    73     audioFile: File;
    72     audioFile: File;
    74     numPixels: LongWord;
    73     numPixels: LongWord;
    75     startTime, numFrames, curTime, progress, maxProgress: LongWord;
    74     startTime, numFrames, curTime, progress, maxProgress: LongWord;
    76     soundFilePath: shortstring;
    75     soundFilePath: shortstring;