#include <GUIConstants.au3> Global $wmp = ObjCreate("WMPlayer.OCX.7") GUICreate ( "测试", 750,750) $GUIActiveX = GUICtrlCreateObj($wmp,0,0,750,750 ) $wmp.uimode="Full" $wmp.url=@ScriptDir & "\U\Disk\2.avi" $WMP.Controls.play GUISetState() While 1 $msg = GUIGetMsg() Select Case $msg = $GUI_EVENT_CLOSE ExitLoop EndSelect Wend
举报
本版积分规则 发表回复 回帖后跳转到最后一页
|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度
GMT+8, 2024-11-16 14:39 , Processed in 0.071181 second(s), 24 queries .
Powered by Discuz! X3.5 Licensed
© 2001-2024 Discuz! Team.