VFP grid中记录有效性检查的问题

来源:百度知道 编辑:UC知道 时间:2024/05/16 09:38:51
GRID中鼠标单击每一条记录,从某一行跳到另一行时,我要加个判断,检查原行的记录中数据是否有效,如果检查未通过,不能跳到新的一行,检查通过就可以跳过去,是写在beforerowcolchange中还是怎么写,一直试不出来,检查函数为thisform.CheckValue()。

悬赏分有点底,过几天有分了,再加,希望大虾帮我一下~在线等~急~

Grid的BeforeRowColChange事件:

IF m.nColIndex=1
ro1=ThisForm.Grid1.ActiveRow
co1=ThisForm.Grid1.ActiveColumn
ThisForm.Grid1.ActivateCell(ro1+1,co1)
ThisForm.Grid1.Refresh
NODEFAULT
ENDIF

不过这样光标一旦移到第一列(Grid获得焦),就移不出去了。
如果去掉了 NODEFAULT ,这样光标行下移了,可是列也下移了。