t.__m_onclick (Cannot make exe. Error 4, failed to compile.)

[John]

im not sure how to make onclick and onrclick functions.

how do i make mac (t.__m_onrclick) into a function ?

TrayWndProc:

Code:

Copy      Help

;/
function# hWnd message wParam lParam

Tray& t

sel message
,case WM_USER+101
,&t=+wParam
,int mod=GetMod
,if(t.__m_func) call t.__m_func wParam lParam
,else if(lParam=WM_LBUTTONUP and mod=2) shutdown -7
,sel lParam
,,case WM_LBUTTONUP if(t.__m_onclick.len and !mod) mac t.__m_onclick; err
,,case WM_RBUTTONUP if(t.__m_onrclick.len and !mod) mac t.__m_onrclick; err
,ret
,
,case else
,if(message=__newtaskbar)
,,&t=+GetWindowLong(hWnd GWL_USERDATA)
,,if(&t) t.AddIcon("" "" 8)

ret DefWindowProc(hWnd message wParam lParam)

code im compiling
----------------------------------------------------------------------------------

Code:

Copy      Help

Tray t.AddIcon("" "tray icon" 0 &TEST_TTRY)

TEST_TTRY:

Code:

Copy      Help

;/
function Tray&tray msg

sel msg
,case WM_LBUTTONUP
,sel GetMod
,,case 0
,,,mac "TEST_2" ;;THIS RUNS A "shutdown -1"
,;;
,case WM_RBUTTONUP
,sel GetMod
,,case 0
,,mac "TEST_1" ;; THIS IS A MENU

----------------------------------------------------------------------------------