主题:vfp中怎样实现:表格中移动光标到未尾,按向下方向键,自动加一空记录,(当未尾记录为空值时不自动加,
小易
[专家分:1280] 发布于 2011-11-23 01:47:00
vfp中怎样实现:表格中移动光标到未尾,按向下方向键,自动加一空记录,(当未尾记录为空值时不自动加,
就是像BROW时追加编辑的那样
回复列表 (共3个回复)
沙发
moz [专家分:37620] 发布于 2011-11-23 15:26:00
在grid的keypress事件中:
>检查是否按了“向下”方向键>
& 检查当前记录是否到底reccount?>
& 检查activatecolumn是否最后一列>
& 检查是否空记录>
>添加空记录
板凳
cqcxy [专家分:60] 发布于 2011-11-25 09:20:00
设置grid的AllowAddNew为“真”
go bott
在grid的keypress事件中:
if !empt(xx).and.nKeyCode=24 &&xx为字段名
APPEND BLANK
endi
3 楼
小易 [专家分:1280] 发布于 2011-11-26 00:14:00
多谢朋友们,我的问题已解决.我自己用的是grid>text.KeyPress事件:
IF nKeyCode=24
IF RECNO() =RECCOUNT() AND !EMPTY(THIS.Value)
NODEFAULT &&&&&ºÜÖØÒªµÄÒ»µã!!!!!!!!!!!!!!!!!!!!!!!!!1
APPEND BLANK
GO BOTTOM
ENDIF
THISFORM.CONtainer1.GRid1.Refresh
ENDIF
我来回复