pb中如何给一个录入框发送一个回车

july 2003-07-28 04:06:56

pb中如何给一个录入框发送一个回车

...全文

238 14 打赏收藏转发到动态举报

写回复

用AI写文章

14 条回复

切换为时间正序

请发表友善的回复…

发表回复

july 2003-08-06

打赏
举报

上帝，我要地是在一个单行录入框模拟硬回车触发，我试验了很多都不行，不过仍然非常感谢，近期结帖

hovoy 2003-08-05

打赏
举报

上面的解答都可以解决

runsoft 2003-08-05

打赏
举报

在WINDOW的Key事件中.
Graphicobject which_cont //控件名称变量
commandbutton cb_which //cb变量

which_cont=GetFocus() //得出当前具有焦点的控件名称
if keydown(keyenter!) then
if typeof(which_cont)=commandbutton! then//如果是cb得到焦点时，执行单击事件。
cb_which=which_cont
cb_which.triggerevent(clicked!)
else
post(handle(which_cont),256,9,0) //发一个 Tab 命令
// messagebox("","")
end if
end if

july 2003-08-05

打赏
举报

我已经很失望，以后是不是每个问题只给20分，因为这种问题结帖让我感觉不值，虽然我的可用分上万

online 2003-07-29

打赏
举报

online 2003-07-29

打赏
举报

july 2003-07-29

打赏
举报

i will up

july 2003-07-28

打赏
举报

不是硬回车

july 2003-07-28

打赏
举报

首先，我可以告诉你，send无效，我已经试过了，而且应当是：Send(Handle(this),256,13,long(0,0))

其次，我非常奇怪，比如我的text名称：sle_1
sle_1.text = sle_1.text+char(13)

居然是显示一个不可见字符！

ls_hndd 2003-07-28

打赏
举报

在数据窗口控件自定义一个pbm_dwnprocessenter事件,加入如下脚本：
if this.accepttext( )<0 then
return 1
else
Send(Handle(this),256,9,long(0,0))
end if
return 1

888888888888 2003-07-28

打赏
举报

同意楼上

runsoft 2003-07-28

打赏
举报

Graphicobject which_cont //控件名称变量
commandbutton cb_which //cb变量

which_cont=GetFocus() //得出当前具有焦点的控件名称
if keydown(keyenter!) then
if typeof(which_cont)=commandbutton! then//如果是cb得到焦点时，执行单击事件。
cb_which=which_cont
cb_which.triggerevent(clicked!)
else
post(handle(which_cont),256,9,0) //发一个 Tab 命令
// messagebox("","")
end if
end if

xingxing 2003-07-28