找回密码
 加入
搜索
查看: 2142|回复: 3

[图形处理] 请问各位高手们怎样能时时更新播放文件呢?如何时时更新播放文件

[复制链接]
发表于 2010-4-17 22:07:06 | 显示全部楼层 |阅读模式
本帖最后由 kxing 于 2010-4-17 22:10 编辑

请问各位高手们怎样能时时更新播放文件呢?
我写了下面这段代码,但是浏览到视频文件后不会播放。
怎样才能刷新播放文件呢,下面的部分代码看不懂。
求助高手帮忙,多谢!
HotKeySet("^{o}","_Dialog")
Global $sPlayer

$GUI = GUICreate("Lama's", 800, 506)
$oObj = ObjCreate("ShockwaveFlash.ShockwaveFlash.1")
$oPlayer = GUICtrlCreateObj($oObj, 0, 0, 800, 506)
    $oObj.Bgcolor = "#000000"
    $oObj.AllowFullscreen = true
    $oObj.AllowNetworking = "all"
    $oObj.AllowScriptAccess = "never"
    $oObj.Movie = $sPlayer
GUISetState()

Do
Until GUIGetMsg()=-3

Func _Dialog()
$sPath=FileOpenDialog("打开播放文件","","(*)")
If Not @Error Then $sPlayer=$sPath
EndFunc
 楼主| 发表于 2010-4-17 22:13:36 | 显示全部楼层
解决了,打扰个为了.
    $oObj.Movie = $sPlayer
 楼主| 发表于 2010-4-17 22:19:19 | 显示全部楼层
还是不行,第二次浏览到其他文件就不更新了.
还是得麻烦高手们!!!!
 楼主| 发表于 2010-4-18 11:46:53 | 显示全部楼层
有人能回答下吗,多谢了!!!
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-5-15 01:11 , Processed in 0.073696 second(s), 23 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表