on key label rightmouse MyFunc()create a function MyFunc
Func MyFunc TmpVar = AMouseObj(a_ObjPointer) if TmpVar > 0 * *** mouse is over an object LOCAL ; ObjPointer ObjPointer = a_MouseObj(1,1) * *** test here for obj type and availability if ObjPointer.Parent.BaseClass = "Column" .and. ObjPointer.Parent.enabled = .f. * *** do your stuff endif endifyou might have to check if the object is the current control in that column to make sure the program fires for the correct object.