求教高手:如何在文本框中设置属性实现只有按回车键才能离开该控件,既是达到文本框绑定的字段长度?

housl 2007-05-30 03:08:05
如何在文本框中设置属性实现只有按回车键才能离开该控件,既是达到文本框绑定的字段长度也不自动跳到下一个控件?
...全文
257 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
LAIYANGPJ 2007-06-04
  • 打赏
  • 举报
回复
再建议:
if this.tag<>"1"
this.tag="0"
return 0
endif
*****************
Ilikefox 2007-05-30
  • 打赏
  • 举报
回复
更正一下:

*文本框的Valid事件:

if this.tag<>"1"
return 0
endif
Ilikefox 2007-05-30
  • 打赏
  • 举报
回复
改写豆十三的代码为:
*文本框的Init事件:(不要了)


*文本框的KeyPress事件:

LPARAMETERS nKeyCode, nShiftAltCtrl
if nKeyCode=13
this.tag="1"
else
this.tag="0"
endif



*文本框的Valid事件:

if this.tag="0"
return 0
endif
十豆三 2007-05-30
  • 打赏
  • 举报
回复
我的方法,只要焦点在这个文本框中,鼠标也移不走,只有回车才可以移走。
housl 2007-05-30
  • 打赏
  • 举报
回复
谢谢
wwwwb 2007-05-30
  • 打赏
  • 举报
回复
在文本框的KeyPress事件中进行判断
if nKeyCode=13
将焦点移到下一个控件
endif
如直接用鼠标定位,怎么办?
十豆三 2007-05-30
  • 打赏
  • 举报
回复
*文本框的Init事件:

Public gnBz
gnBz=0



*文本框的KeyPress事件:

LPARAMETERS nKeyCode, nShiftAltCtrl
if nKeyCode=13
gnBz=1
else
gnBz=0
endif



*文本框的Valid事件:

if gnBz=0
return 0
endif
shxmh 2007-05-30
  • 打赏
  • 举报
回复
SET CONFIRM ON
即使字符数已达到文本框规定的字符数也不退出文本框

2,723

社区成员

发帖
与我相关
我的任务
社区描述
VFP,是Microsoft公司推出的数据库开发软件,用它来开发数据库,既简单又方便。
社区管理员
  • VFP社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧