科技行者

行者学院 转型私董会 科技行者专题报道 网红大战科技行者

知识库

知识库 安全导航

至顶网软件频道基础软件WinCE中基于Media Player的多媒体开发

WinCE中基于Media Player的多媒体开发

  • 扫一扫
    分享文章到微信

  • 扫一扫
    关注官方公众号
    至顶头条

在过去的10年里,移动技术已经取得了令人难以置信的进步和成就。应用Windows CE系统的移动设备也在应用和编程方面变得更加灵活和方便。

作者:维维编译 来源:天极开发 2007年11月21日

关键字:

  • 评论
  • 分享微博
  • 分享邮件
 使用旧版本的WMP控件

  如果你使用的手持设备没有WMP10,那事情还没有完。你仍然还可以使用WMP OCX版本8来为你的Pocket PC编程,虽然提供的功能特性少,好在也可以基本满足需要。我创建了一个简单的工程来展示它如何在MFC环境下工作。下面的代码段证明了它和ATL方式一样简单:

BOOL CWMP8SampleDlg::OnInitDialog()
{
 CDialog::OnInitDialog();
 // Set the icon for this dialog. The framework does this
 // automatically when the application's main window is not
 // a dialog
 SetIcon(m_hIcon, TRUE);
 // Set big icon
 SetIcon(m_hIcon, FALSE);
 // Set small icon
 CenterWindow(GetDesktopWindow());
 // center to the hpc screen
 CRect rect;
 m_Panel.GetClientRect(&rect);
 if ( m_PlayerWnd.CreateControl(__uuidof(WMP),L"", WS_VISIBLE|WS_CHILD,rect, &m_Panel,AFX_IDW_PANE_FIRST) )
 {
  LPUNKNOWN lpUnk = m_PlayerWnd.GetControlUnknown();
  HRESULT hr = lpUnk->QueryInterface(__uuidof(IWMP),(void**) &m_spWMPPlayer);
 }
 else
 {
  AfxMessageBox(L"Failed to create WMP control");
  ::PostQuitMessage(0);
  return 0;
 }
 if ( m_spWMPPlayer )
 {
  m_WMPEvents.m_pMainDlg = (CWMP8SampleDlg*)this;
  CComPtr<IConnectionPointContainer> spConnectionContainer;
  HRESULT hr = m_spWMPPlayer-> QueryInterface( IID_IConnectionPointContainer, (void**)&spConnectionContainer );
  if (SUCCEEDED(hr))
  {
   hr = spConnectionContainer-> FindConnectionPoint( __uuidof(_IWMPEvents), &m_spConnectionPoint );
  }
  if (SUCCEEDED(hr)) { hr = m_spConnectionPoint->Advise((IDispatch*)&m_WMPEvents, &m_dwAdviseCookie );
 }
 else
 {
  AfxMessageBox(L"Failed to get WMP control events");
  ::PostQuitMessage(0);
  return 0;
 }
 if ( FAILED(SetupWMP()) )
 {
  AfxMessageBox(L"Failed to setup WMP control");
  ::PostQuitMessage(0);
  return 0;
 }
}
m_spWMPPlayer->Stop();
return TRUE;
// return TRUE unless you set the focus to a
// control
}

查看本文来源

    • 评论
    • 分享微博
    • 分享邮件
    邮件订阅

    如果您非常迫切的想了解IT领域最新产品与技术信息,那么订阅至顶网技术邮件将是您的最佳途径之一。

    重磅专题
    往期文章
    最新文章