Postup:
Do projektu musφte nejprve p°edat referenci na soubor runtimov²
soubor pro DirectShow quartz.dll. Mo₧nß budete muset pou₧φt tlaΦφtko
Prochßzet, abyste jej nalezli, je v systΘmovΘm adresß°i Windows.
Verze knihovny musφ b²t 5.1.18.1024 a vyÜÜφ, je instalovßna s IE 4.01
a VS 6.0. Pak na formulß° p°idejte tlaΦφtko a zapiÜte nßsledujφcφ k≤d:
Private Sub
Command1_Click()
Static
PMC As Object
Dim MyFile As String
MyFile
= "<Cesta a jmΘno k VaÜemu AU souboru>"
Set PMC = New FilgraphManager
PMC.RenderFile MyFile
PMC.Run
End Sub
|