does anybody know why this code don't work
Hello,
does anybody know why this code don't work,
I want to display the menu of a video codec
regards
Frank
Declare Function ICOpen Lib "msvfw32.dll" (ByVal fccType As Int32, _
ByVal fccHandler As Int32, ByVal wMode As Int32) As Int32
Declare Function ICSendMessage Lib "msvfw32.dll" (ByVal hic As Int32, _
ByVal msg As Int32, ByRef dw1 As Int32, ByRef dw2 As Int32) As Int32
Declare Function mmioStringToFOURCC Lib "winmm.dll" Alias "mmioStringToFOURCCA" _
(ByVal sz As String, ByVal uFlags As Int32) As Int32
Const DRV_USER = &H4000
Const ICM_RESERVED_LOW = (DRV_USER + &H1000)
Const ICM_RESERVED = ICM_RESERVED_LOW
Const ICM_CONFIGURE = (ICM_RESERVED + 10)
Const MMIO_TOUPPER = &H10
Const ICMODE_QUERY = 4
Private Sub Button1_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles Button1.Click
Dim fccType As Int32
Dim fccHandler As Int32
Dim hic As Int32
fccType = mmioStringToFOURCC("VIDC", MMIO_TOUPPER)
fccHandler = mmioStringToFOURCC("cvid", MMIO_TOUPPER)
hic = ICOpen(fccType, fccHandler, ICMODE_QUERY)
ICSendMessage(hic, ICM_CONFIGURE, Handle.ToInt32, 0)
End Sub
