06-22-2006, 04:57 PM
;/
function action hwnd ;;action: 1 add, 2 delete
;Adds or deletes taksbar button for window whose handle is hwnd.
interface# ITaskbarList :IUnknown
,HrInit()
,AddTab(hwnd)
,DeleteTab(hwnd)
,ActivateTab(hwnd)
,SetActiveAlt(hwnd)
,{56FDF342-FD6D-11d0-958A-006097C9A090}
ITaskbarList t._create("{56FDF344-FD6D-11D0-958A-006097C9A090}")
t.HrInit
sel action
,case 1 t.AddTab(hwnd)
,case 2 t.DeleteTab(hwnd)
err end _error