Winamp Media Library

You can talk about VB programming here

Winamp Media Library

Postby Snoopy1968 » Sun Oct 14, 2007 12:48 pm


I wonder if someone can help me
im trying to read the winamp media library
i use EnumWindows to find it
Public Function EnumWindowsProcML(ByVal hndleM As Long, ByVal parm As Long) As Boolean

Dim sSave As String, Ret As Long
Ret = GetWindowTextLength(hndleM)
sSave = Space(Ret)
GetWindowText hndleM, sSave, Ret + 1
If InStr(sSave, "Media Library") Then
Lnghnd9 = Str$(hndleM)
strClassname8 = GetClass(Lnghnd9)
Library = GetWinTitle(Lnghnd9)
End If

EnumWindowsProcML = True




End Function
Public Sub Medialib(Optional strClassname8 As String)
Dim retval As Boolean
retval = EnumWindows(AddressOf EnumWindowsProcML, 0)
strClassname8 = GetClass(Lnghnd9)

End Sub
This Function aparentley works

but when i try use x = FindWindow("#32770", Library)

this telles me thaht it cant find the window x returns 0

any help?
Snoopy1968
imFiles Newbie
imFiles Newbie
 
Posts: 47
Joined: Fri Sep 14, 2007 8:29 pm

Return to Visual Basic Programming

 


  • Related topics
    Replies
    Views
    Last post

Who is online

Users browsing this forum: Google [Bot] and 0 guests