1. 事先在表单上新建一个方法,如:GridRightClick,在其中加入单击右键时需执行的代码。
2. 在添加表格控件后,将各列文本框的 RightClick 事件与表单的 GridRightClick 绑定,如下所示:
FOR EACH oCol IN THISFORM.Grid1.Columns
BINDEVENT(oCol.Text1,'RightClick',THISFORM,'GridRightClick')
NEXT
也可以为表格自定义一个类,在类中定义表格、列、文本框,并定义文本框的 RightClick 代码,不再赘述。