实现flash全屏播放(100分)

  • 主题发起人 主题发起人 sushicheng
  • 开始时间 开始时间
S

sushicheng

Unregistered / Unconfirmed
GUEST, unregistred user!
如何用ShockWave flash实现flash全屏播放.急,请高人指点;
 
下面是我做的播放的几句代码,临时加了点注释:
另外我处理了右键菜单,可以关闭窗口,
这个要先弄好,查下论坛以前的讨论

ShockwaveFlash1.parent:=frmFullScreen
//这是一个全屏的窗口
frmFullScreen.showmodal
//放大了
ShockwaveFlash1.parent:=GroupBox1
//关闭时缩回主窗口一个面板上
ShockwaveFlash1.DoObjectVerb(OLEIVERB_SHOW)
//刷新显示
 
后退
顶部