'已经引用了quatrz.dll,问题是无法显示图像
Dim pMC As Object
Private Sub Command1_Click()
Dim pVW As IVideoWindow
Set pMC = New FilgraphManager
pMC.RenderFile "e:\WEEZER.MPG"
Set pVW = pMC
pVW.WindowStyle = CLng(&H6000000)
pVW.Left = 0
pVW.Top = 0
OldWidth = pVW.Width
OldHeight = pVW.Height
picTV.Width = pVW.Width * 15
picTV.Height = pVW.Height * 15
pVW.Owner = picTV.hWnd
希望高手指点怎么能显示出图像或者其他方面是不是有什么问题
Dim pMC As Object
Private Sub Command1_Click()
Dim pVW As IVideoWindow
Set pMC = New FilgraphManager
pMC.RenderFile "e:\WEEZER.MPG"
Set pVW = pMC
pVW.WindowStyle = CLng(&H6000000)
pVW.Left = 0
pVW.Top = 0
OldWidth = pVW.Width
OldHeight = pVW.Height
picTV.Width = pVW.Width * 15
picTV.Height = pVW.Height * 15
pVW.Owner = picTV.hWnd
希望高手指点怎么能显示出图像或者其他方面是不是有什么问题
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货