OpenEuphoria

function Foo(atom ctl, atom event) 
if peek(event) = 7 then 
	if peek(event+40) = 1 then -- left btn, 2=mid, 3=right 
		printf(1,"%s\n",{get(tv,"text",1)}) -- txt from first column 
	end if 
end if 
return 0 
end function 
connect(tv,"event",call_back(routine_id("Foo")))