vb中使用Windows訊息控制Winamp

第一部分：得到Winamp的視窗

Winamp是一個32位的Windows應用程式。也就是說,我們可以使用32位的Windows編程的一些基礎技術來實現控制Winamp，即使用Windows的訊息系統。在你給Winamp發送訊息之前，你必須得到Winamp視窗的控制代碼。這裡有個方法，使用外部應用程式（例如你自己編寫的VB應用）就可以達到要求。

Public Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Dim hwndWinamp as long
hwndWinamp = FindWindow("Winamp v1.x",vbNullString)

大家可能會注意到一點，為什麼要使用類名"Winamp v1.x"來FindWindow呢？因為Winamp 1.x 和 2.x 的所有版本都是用"Winamp v1.x"這個class name的。

第二部分：使用訊息

Winamp相應的三個訊息：WM_USER，WM_COMMAND，和 WM_COPYDATA。WM_USER 和 WM_COPYDATA 允許你可以對Winamp進行一些進階的控制。而WM_COMMAND則可以做一些簡單的操作，如暫停，播放，和跳到下一首音樂。

1.WM_COMMAND 訊息：

Previous track button　　　　　　　　　 40044

Next track button　　　　　　　　　　　 40048

Play button　　　　　　　　　　　　　　 40045

Pause/Unpause button　　　　　　　　　　40046

Stop button　　　　　　　　　　　　　　 40047

Fadeout and stop　　　　　　　　　　　　40147

Stop after current track　　　　　　　　40157

Fast-forward 5 seconds　　　　　　　　　40148

Fast-rewind 5 seconds　　　　　　　　　 40144

Start of playlist　　　　　　　　　　　 40154

Go to end of playlist　　　　　　　　　 40158

Open file dialog　　　　　　　　　　　　40029

Open URL dialog　　　　　　　　　　　　 40155

Open file info box　　　　　　　　　　　40188

Set time display mode to elapsed　　　　40037

Set time display mode to remaining　　　40038

Toggle preferences screen　　　　　　　 40012

Open visualization options　　　　　　　40190

Open visualization plug-in options　　　40191

Execute current visualization plug-in　 40192

Toggle about box　　　　　　　　　　　　40041

Toggle title Autoscrolling　　　　　　　40189

Toggle always on top　　　　　　　　　　40019

Toggle Windowshade　　　　　　　　　　　40064

Toggle Playlist Windowshade　　　　　　 40266

Toggle doublesize mode　　　　　　　　　40165

Toggle EQ　　　　　　　　　　　　　　　 40036

Toggle playlist editor　　　　　　　　　40040

Toggle main window visible　　　　　　　40258

Toggle minibrowser　　　　　　　　　　　40298

Toggle easymove　　　　　　　　　　　　 40186

Raise volume by 1%　　　　　　　　　　　40058

Lower volume by 1%　　　　　　　　　　　40059

Toggle repeat　　　　　　　　　　　　　 40022

Toggle shuffle　　　　　　　　　　　　　40023

Open jump to time dialog　　　　　　　　40193

Open jump to file dialog　　　　　　　　40194

Open skin selector　　　　　　　　　　　40219

Configure current visualization plug-in 40221

Reload the current skin　　　　　　　　 40291

Close Winamp　　　　　　　　　　　　　　40001

Moves back 10 tracks in playlist　　　　40197

Show the edit bookmarks　　　　　　　　 40320

Adds current track as a bookmark　　　　40321

Play audio CD　　　　　　　　　　　　　 40323

Load a preset from EQ　　　　　　　　　 40253

Save a preset to EQF　　　　　　　　　　40254

Opens load presets dialog　　　　　　　 40172

Opens auto-load presets dialog　　　　　40173

Load default preset　　　　　　　　　　 40174

Opens save preset dialog　　　　　　　　40175

Opens auto-load save preset　　　　　　 40176

Opens delete preset dialog　　　　　　　40178

Opens delete an auto load preset dialog 40180