V>IGraphBuilder *m_pGraph;
V>    IMediaControl *m_pMediaControl;
V>    IMediaSeeking *m_pMediaSeeking;
V>    IBasicVideo   *m_pBasicVideo;

V>    ICaptureGraphBuilder2 *m_pBuilder;
V>    IBaseFilter           *m_pMuxFilter;
V>    IBaseFilter           *m_pSourceFilter;

V>    HRESULT hr = 0;
V>      hr = CoInitializeEx(NULL, COINIT_APARTMENTTHREADED);
V>      if( hr != S_OK ) { AfxMessageBox(_T("Error1")); return false; }
V>      hr = CoCreateInstance(CLSID_FilterGraph, NULL, CLSCTX_INPROC_SERVER, IID_IGraphBuilder, (void **)&m_pGraph);
V>      if( hr != S_OK ) { AfxMessageBox(_T("Error2")); return false; }
V>    hr = m_pGraph->QueryInterface(IID_IMediaControl, (void **)&m_pMediaControl);
V>      if( hr != S_OK ) { AfxMessageBox(_T("Error3")); return false; }
V>    hr = m_pGraph->QueryInterface(IID_IMediaSeeking, (void **)&m_pMediaSeeking);
V>    if( hr != S_OK ) { AfxMessageBox(_T("Error4")); return false; }
V>    hr = m_pGraph->QueryInterface(IID_IBasicVideo, (void **)&m_pBasicVideo);
V>    if( hr != S_OK ) { AfxMessageBox(_T("Error5")); return false; }
V>    // Helps the building all Graphs
V>    hr = CoCreateInstance((REFCLSID)CLSID_CaptureGraphBuilder2, NULL, CLSCTX_INPROC, (REFIID)IID_ICaptureGraphBuilder2, (void **)&m_pBuilder);
V>    if( hr != S_OK ) { AfxMessageBox(_T("Error6")); return false; }
V>    hr = m_pBuilder->SetFiltergraph(m_pGraph);
V>    if( hr != S_OK ) { AfxMessageBox(_T("Error7")); ASSERT(FALSE); return false; }
V>    // Add the avimux, and file writer to the graph 
V>      LPCOLESTR destAvi = _T("c:\\new15.avi");
V>      hr = m_pBuilder->SetOutputFileName(&MEDIASUBTYPE_Avi, destAvi, &m_pMuxFilter, NULL);
V>      if( hr != S_OK ) { AfxMessageBox(_T("Error8")); return false; }
V>      // Set the AVI Options like interleaving mode etc...
V>    CComPtr<IConfigAviMux> pConfigAviMux;
V>    hr = m_pMuxFilter->QueryInterface(IID_IConfigAviMux, (void **)&pConfigAviMux);
V>      if( hr != S_OK ) { AfxMessageBox(_T("Error9")); return false; }
V>      hr = pConfigAviMux->SetOutputCompatibilityIndex(FALSE);
V>      if( hr != S_OK ) { AfxMessageBox(_T("Error10")); return false; }
V>      // QI for interface Interleaving
V>    CComPtr<IConfigInterleaving>  pInterleaving;
V>    hr = m_pMuxFilter->QueryInterface(IID_IConfigInterleaving, reinterpret_cast<PVOID *>(&pInterleaving));
V>      if( hr != S_OK ) { AfxMessageBox(_T("Error11")); return false; }
V>      hr = pInterleaving->put_Mode(INTERLEAVE_FULL);
V>      if( hr != S_OK ) { AfxMessageBox(_T("Error12")); return false; }
V>      LPCWSTR srcAvi = TEXT("c:\\Сердце лета.avi");
V>    hr = m_pGraph->RenderFile(srcAvi, NULL);
V>      if( hr != S_OK ) { AfxMessageBox(_T("Error13")); return false; }
V>    hr = m_pBuilder->FindInterface(&LOOK_UPSTREAM_ONLY, 0, m_pMuxFilter, IID_IMediaSeeking, (void **)&m_pMediaSeeking);
V>      if( hr != S_OK ) { AfxMessageBox(_T("Error14")); return false; }
V>    hr = m_pMediaSeeking->SetTimeFormat(&TIME_FORMAT_FRAME);
V>      if( hr != S_OK ) { AfxMessageBox(_T("Error15")); return false; }
V>      REFERENCE_TIME cur, stop;
V>    hr = m_pMediaSeeking->GetPositions(&cur, &stop);
V>      cur  = 10;
V>      stop = 50;
V>      if( hr != S_OK ) { AfxMessageBox(_T("Error16")); return false; }
V>    hr = m_pMediaSeeking->SetPositions(&cur, AM_SEEKING_AbsolutePositioning | AM_SEEKING_SeekToKeyFrame, &stop, AM_SEEKING_AbsolutePositioning | AM_SEEKING_SeekToKeyFrame);
V>      if( hr != S_OK ) { AfxMessageBox(_T("Error17")); return false; }
V>    if( m_pMediaControl->Run() != S_OK ) { AfxMessageBox(_T("Error18")); return false; }
V>      IMediaEvent   *pEvent;
V>      hr = m_pGraph->QueryInterface(IID_IMediaEvent, (void **)&pEvent);
V>      long EvCode = 0;
V>      // Have we received the EC_COMPLETE event?
V>      hr = pEvent->WaitForCompletion(INFINITE, &EvCode);
V>      // Stop the graph
V>      m_pMediaControl->Stop();
V>