[REBOL] Skinz 0.1 (Now an API Tutorial)
From: tbrownell:shaw:ca at: 23-Feb-2002 16:41
Just checking out the skins on the Etienne web site, very nice. Perhaps we
could use those as default skins for the player to aid others in designing
their own.
It's possible to hide Winamp altogether (under preferences in Winamp) and
have Rebol controll the app. I'm sure a nicely skinned Rebol could add a
layer of function on top of Winamp.It'd be cool if we could get some sort of
visualization thing happening in a pane as well, not sure.
We have the API working to determine the winamp window, but can't get the
WM_COMMAND function to kick in. Any ideas? (Again, heres the url for api
info...
http://www.winamp.com/nsdn/winamp2x/dev/sdk/api.jhtml )
Here's what we have so far...
Rebol []
win-user: load/library %user32.dll
find-window: make routine! [
ClassName [string! integer!]
WindowName [string! integer!]
return: [integer!]
] win-user "FindWindowA"
find-window-by-class: make routine! [
ClassName [string!]
WindowName [integer!]
return: [integer!]
] win-user "FindWindowA"
find-window-by-name: make routine! [
ClassName [integer!]
WindowName [string!]
return: [integer!]
] win-user "FindWindowA"
print find-window "REBOL" "REBOL/View"
print find-window-by-name 0 "Winamp"
wahwnd: find-window-by-class "Winamp v1.x" 0
;>>> Begin debuggin here :)
WA-Command: make routine! [
hwnd [integer!]
WM_COMMAND [Integer!]
] win-user "SendMessageA"
WA-Command wahwnd 400
halt
;End
Not exactly sure where the problem lies with the WA-Command routine, but it
sure don't work.
TB