I am writing my own DLL for playing mp3 wiht DirectX.
I'm wondering is this correct, because I have problem with this :
Code:Public Property Let LoadFile(ByVal File As String, Level As Integer) DirectShow_Load_Media File DirectShow_Volume Level DirectShow_Balance 0 DirectShow_Speed 100 DirectShow_Set_Position 0, 0, 0, 0 End Property Public Property Let UcitajFile(ByVal File As String, Glasnoca As Integer) DirectShow_Load_Media File DirectShow_Volume Glasnoca DirectShow_Balance 0 DirectShow_Speed 100 DirectShow_Set_Position 0, 0, 0, 0 End Property Public Property Let SetLevel(ByVal Level As Integer) DirectShow_Volume Level End Property Public Property Let RunFile(ByVal State As Boolean) On Error Resume Next If State Then DirectShow_Play Else DirectShow_Stop End If End Property




Reply With Quote