电脑中没有安装快播.
可进这里看一下: 传 送 门
3,快播对象 au3的引用:
以下是首先载入qvod窗体 ,以上的指令才起到操作作用。。。
Func _qvod_init() ;初始化快播....
Global $Qvod = ObjCreate("QvodInsert.QvodCtrl.1") ;创建快播类对象
If @error Then
MsgBox(0,"错误","检测到系统未安装快播,请安装快播再打开本软件")
ShellExecute("http://www.kuaibo.com/")
Exit
EndIf
Global $Qvod_ctrl = GUICtrlCreateObj($Qvod, 8, 82, 449, 319) ;创建控件 在gui中的 位置 与 大小
If @error Then
MsgBox(0,"错误","检测到系统未安装快播,请安装快播再打开本软件")
ShellExecute("http://www.kuaibo.com/")
Exit
EndIf
GUICtrlSetState($Qvod_ctrl,$GUI_ENABLE) ;设置控件状态 $GUI_ENABLE 可见;$GUI_HIDE 不可见
EndFunc
|