BOOL  CMpegGraph::LoadGrfFile(LPCSTR  FileName)
{
  WCHAR           wFileName[256];
  IStorage        *pStorage = NULL;
  IPersistStream  *pPersistStream = NULL;
// Convert ANSI file name to Unicode
  MultiByteToWideChar( CP_ACP, 0, FileName,strlen(FileName)+1, 
                        wFileName, sizeof(wFileName)/sizeof(wFileName[0]) );

  if (S_OK != StgIsStorageFile(wFileName))
  {
    m_hr = E_FAIL;
    return FALSE;
  }

  m_hr = StgOpenStorage(wFileName, 0, STGM_TRANSACTED | STGM_READ | STGM_SHARE_DENY_WRITE, 
                        0, 0, &pStorage);
  if (FAILED(m_hr))
  {
    return FALSE;
  }
  
  m_hr = m_IGraphBuilder->QueryInterface(IID_IPersistStream,
                                         reinterpret_cast<void**>(&pPersistStream));
  if (SUCCEEDED(m_hr))
  {
    IStream *pStream = 0;
    m_hr = pStorage->OpenStream(L"ActiveMovieGraph", 0, 
                                STGM_READ | STGM_SHARE_EXCLUSIVE, 0, &pStream);
    if(SUCCEEDED(m_hr))
    {
      m_hr = pPersistStream->Load(pStream);
      pStream->Release();
    }
    pPersistStream->Release();
  }

  pStorage->Release();

  return SUCCEEDED(m_hr);
}