Menu problems 1

[ArmysArmy]

I'm using vtcl 1.6.0 and I'm having trouble with menus. I trying to use the following code to call a procedure when a menu item is selected. The procedure never gets called. I must be missing a step.

Thanks for the help in advance.

menu $top.m71 \
-activeborderwidth 1 -borderwidth 1 -tearoff 1
$top.m71 add cascade \
-menu "$top.m71.men72" \
-command [list vTcloCmdOption $top.m71.men72 {ShowDialog "System menu pressed"}] \
-label System

 

[Bong]

I think that rather than type, cascade you want type, command.

_________________
Bob Rashkin