Извлечение кадров из *.avi файла

// izvlechenie_cadra.cpp: определяет точку входа для консольного приложения.
//
 
#include "stdafx.h"
#include <Windows.h>
#include <WindowsX.h>
#include <iostream>
#include <Vfw.h>
#include <atlstr.h>//CString
#include <string.h> 
#include <string>
#include <ShellAPI.h>
//#include <afxwin.h>// AfxMessageBox
 
#pragma comment(lib, "vfw32.lib")
 
using namespace std;
BOOL CreateFromPackedDIBPointer(LPBYTE pDIB, int iFrame);
 
BOOL ExtractAVIFrames(string szFileName)
{
    AVIFileInit();
 
    PAVIFILE avi;
    int res=AVIFileOpen(&avi, "ZOL.avi", OF_READ, NULL);
 
    if (res!=AVIERR_OK)
    {
        //ошибка возникает
        if (avi!=NULL)
            AVIFileRelease(avi);
        
        return FALSE;
    }
 
    AVIFILEINFO avi_info;
    AVIFileInfo(avi, &avi_info, sizeof(AVIFILEINFO));
 
    CString szFileInfo;
    szFileInfo.Format("Dimention: %dx%d\n"
                      "Length: %d frames\n"
                      "Max bytes per second: %d\n"
                      "Samples per second: %d\n"
                      "Streams: %d\n"
                      "File Type: %d", 
                            avi_info.dwWidth,
                            avi_info.dwHeight,
                            avi_info.dwLength,
                            avi_info.dwMaxBytesPerSec,
                            (DWORD) (avi_info.dwRate / avi_info.dwScale),
                            avi_info.dwStreams,
                            avi_info.szFileType);
 
    MessageBox(NULL,szFileInfo,"", MB_ICONINFORMATION | MB_OK);
 
    PAVISTREAM pStream;
    res=AVIFileGetStream(avi, &pStream, streamtypeVIDEO /*video stream*/, 
                                               0 /*first stream*/);
 
    if (res!=AVIERR_OK)
    {
        if (pStream!=NULL)
            AVIStreamRelease(pStream);
 
        AVIFileExit();
        return FALSE;
    }
 
    //сделать некоторые задачи с поток
    int iNumFrames;
    int iFirstFrame;
 
    iFirstFrame=AVIStreamStart(pStream);
    if (iFirstFrame==-1)
    {
        //Ошибка getteing кадр внутри потока
 
        if (pStream!=NULL)
            AVIStreamRelease(pStream);
 
        AVIFileExit();
        return FALSE;
    }
 
    iNumFrames=AVIStreamLength(pStream);
    if (iNumFrames==-1)
    {
        //Ошибка getteing количество из кадры внутри потока
        
        if (pStream!=NULL)
            AVIStreamRelease(pStream);
        
        AVIFileExit();
        return FALSE;
    }
 
    //получение растрового изображения от кадра
    BITMAPINFOHEADER bih;
    ZeroMemory(&bih, sizeof(BITMAPINFOHEADER));
 
    bih.biBitCount=24;    //24 бита на пиксел
    bih.biClrImportant=0;
    bih.biClrUsed = 0;
    bih.biCompression = BI_RGB;
    bih.biPlanes = 1;
    bih.biSize = 40;
    bih.biXPelsPerMeter = 0;
    bih.biYPelsPerMeter = 0;
    bih.biWidth=1280;
    bih.biHeight=720;
    //вычислить Общий размер из RGBQUAD строк (выравнивание DWORD)
    bih.biSizeImage = (((bih.biWidth * 3) + 3) & 0xFFFC) * bih.biHeight ;
 
    PGETFRAME pFrame;
    pFrame=AVIStreamGetFrameOpen(pStream, 
          // NULL//
          //(BITMAPINFOHEADER*) AVIGETFRAMEF_BESTDISPLAYFMT
          &bih );
    
    //Получить первый кадр
    int index=0;
    for (int i=iFirstFrame; i<iNumFrames; i++)
    {
        index= i-iFirstFrame;
 
        BYTE* pDIB = (BYTE*) AVIStreamGetFrame(pFrame, index);
        CreateFromPackedDIBPointer(pDIB,index);
        
        //CreateFromPackedDIBPointer((LPBYTE)pDIB, index);
    }
 
    AVIStreamGetFrameClose(pFrame);
 
    //закрыть поток после завершения задачи
    if (pStream!=NULL)
        AVIStreamRelease(pStream);
 
    AVIFileExit();
 
    return TRUE;
}
 
 
 
BOOL CreateFromPackedDIBPointer(LPBYTE pDIB, int iFrame)
{
   //ASSERT(pDIB!=NULL);
 
    //Создает полный цвет (без палитры) DIB из указателя к     //полноцветная памяти DIB 
    //получить BITMAPINFOHEADER
    BITMAPINFOHEADER bih;
    RtlMoveMemory(&bih.biSize, pDIB, sizeof(BITMAPINFOHEADER));
 
    //теперь получить bitmap бит    
    if (bih.biSizeImage < 1)
    {
        return FALSE;
    }
 
    BYTE* Bits=new BYTE[bih.biSizeImage];
 
    RtlMoveMemory(Bits, pDIB + sizeof(BITMAPINFOHEADER), bih.biSizeImage);
 
    //and BitmapInfo переменной длины UDT     
    BYTE memBitmapInfo[40];
    RtlMoveMemory(memBitmapInfo, &bih, sizeof(bih));
 
    BITMAPFILEHEADER bfh;
    bfh.bfType=19778;    //BM заголовка 
    bfh.bfSize=55 + bih.biSizeImage;
    bfh.bfReserved1=0;
    bfh.bfReserved2=0;
    bfh.bfOffBits=sizeof(BITMAPINFOHEADER) + sizeof(BITMAPFILEHEADER); //54
    
    string FileName;
    FileName.insert(6,5,iFrame);
        //Format("Frame-%05d.bmp", iFrame);
    
    FILE* fp=fopen(FileName.c_str(), "wb");
    if (fp!=NULL)
    {
        fwrite(&bfh, sizeof(bfh), 1, fp);
        fwrite(&memBitmapInfo, sizeof(memBitmapInfo), 1, fp);
        fwrite(Bits, bih.biSizeImage, 1, fp);
        fclose(fp);
    }
    else
    {
        MessageBox(NULL,_T("Error writing the bitmap file"),"",MB_OK);
        return FALSE;
    }
 
    delete [] Bits;
    return TRUE;
}
 
 
int _tmain(int argc, _TCHAR* argv[])
{
    ExtractAVIFrames("ZOL.avi");
    return 0;
}

BYTE* pDIB = (BYTE*) AVIStreamGetFrame(pFrame, index);
        CreateFromPackedDIBPointer(pDIB,index);