$Win=Win32::GUI::Window->new( ); $tv=$Win->AddTreeView( -onClick=> \&onClick_TreeView, -onDblClick => \&onDblClick_TreeView, -onRightClick => \&onRightClick, );