建立一个无边框的frmDisplay,使用modeless方式最大化显示,
然后mmcontrol1.hwnddisplay = frmdisplay.hwnd
mmcontrol1.command="Play"

解决方案 »

  1.   

    大家帮帮我啊?
    用API函数好像可以的,但是我输入sendstring "play MCI fullscreen"好像没有反应啊。怎么回事?还有关于播放视频文件时关闭声音sendstrin "set MCI all off"好像也不行,为什么呢?
      

  2.   

    以前做过,好象是把播放窗口的FORM设为全屏,再把播放句柄设为它的句柄。
      

  3.   

    MPGFile=″play″+MPGFile+″fullscreen″  
      Rval=mciSendString(AVIFile,0&,0,0&) 
      

  4.   

    啊,应该是这样  
        MPGFile=″play″+MPGFile+″fullscreen″  
      Rval=mciSendString(mpgFile,0&,0,0&)