[求助] flash 控件怎么用
想在form 里面加个FLASH 上网找了一下,都是用shockwave flash object控件的,代码也全是这一个1.Command1.click Event:
Thisform.Olecontrol1.movie=getfile(″SWF″) & 确实后缀名为?SWF
Thisform.refresh
2.Command2.click Event:
Thisform.Olecontrol1.playing=.T. & 播放Flash动画
Thisform.refresh
3.Command3.click Event:
Thisform.Olecontrol1.playing=.F. & 暂停当前动画的播放
Thisform.refresh
4.Command4.click Event:
a=Message Box(″你真的要退出吗?″,1+32+0,″提示信息″)
if a=1
Thisform.release & 选择“确定”按钮,则退出
endif
仿照它自己新建了个form 尝试
但只要我一按command1 就弹一个打开窗口要我打开文件,但文件名是help file 的,
我写的是
getfile("colorlight.swf")