Catch MOUSEEVENT on ListView?

Hm, i didn't got it with events. I used a canvas
under the listboxitem. It's a very
baaaad codestil. I tested it under Win, it works!
Don't know whether that is platformindependent.

Look at this code german fellow. ;)

window=CreateWindow("asd",10,10,400,400)

canvas=CreateCanvas(0,0,400,300,window)
listbox=CreateListBox(0,0,400,300,window)
AddGadgetItem listbox,"asd"
AddGadgetItem listbox,"asd2"
AddGadgetItem listbox,"asd3"

'HideGadget canvas
'ActivateGadget canvas

While WaitEvent()
Select EventID()
Case EVENT_WINDOWCLOSE
End

Case EVENT_MOUSEDOWN
Select EventData()
Case 1
SelectGadgetItem listbox,Rand(0,2)
'RedrawGadget listbox
'RedrawGadget canvas
'Notify("MT2")
End Select

End Select

Wend


IMurDOOM