发信人: meichaol()
整理人: flyingmist(2000-03-05 23:18:33), 站内信件
|
【 在 [email protected] (淘淘) 的大作中提到: 】
: 我想用回车键来代替点击命令按纽，请问应该如果编程？
当焦点落在命令按钮上时，把这个按钮的default属性设置成true
--
I do what I want to do
ICQ:9322870
※ 来源:．月光软件站 http://www.moon-soft.com．[FROM: 210.72.229.88]
发信人: edison (edison), 信区: Powerbuilder
标 题: Re: 如何用回车键代替鼠标点击？
发信站: 网易 BBS (Mon Oct 25 22:02:32 1999), 站内信件
这样试一下：
做一个按钮，定义成 default， 把他放到窗口边界外
（先放好按钮，写好代码，再将窗口缩小 )
在里面写上
DragObject ldo_obj
ldo_obj = GetFocus ()
if ldo_obj.ClassName () = This.ClassName () Then &
Return
if ldo_obj.typeof() = This.typeof () Then
ldo_obj.dynamic Event Clicked ()
End if
这招是受到精华区 "Pb 技巧" 目录中 davidfei 的大作
的启发而成。我已经试过了没问题。
不过这有一个缺点，就是如果你的窗口中有多行编辑框
就有问题了，你的多行编辑框不能输入多行了。
估计其他的需要截获 ENTER 击键消息的事件也不会触发了。
【 在 [email protected] (淘淘) 的大作中提到: 】
: 我想用回车键来代替点击命令按纽，请问应该如果编程？
--
谢谢没有在 "将本文章寄一份给原作者" 处打勾, 再次感谢!
※ 来源:．网易 BBS bbs.netease.com．[FROM: bbs.szptt.net.cn]
|
|