请教三个很基础问题,别处拿50分。(0分)

  • 主题发起人 主题发起人 冰雪
  • 开始时间 开始时间
TO l_q28老兄:
按你说的方法做就对了,
请到http://delphibbs.com/delphibbs/dispq.asp?lid=1344933先拿分吧,
如果其实的朋友能把其它问题解决了
还是会给你们加分的。
 
将电脑猛砸三下,问题即可解决,^_^
 
1、如何将焦点移至上一个控件?
这个可以用SelectNext.他是移动焦点用的。可以向前也可以向后。
如SelectNext(TWinControl(Sender),False,False);
^---是向后,为True前是向前
2、为什么在combobox上输入汉字会出现乱码?如何解决?
3、我在edit1的onenter事件里输入以下代码:
后面两个前面已经说过。可ComboBox的AutoComplete设为False;
把Edit的AutoSelect设为True
 
TO coldew:
多谢你多次的帮助,我按你说的1做了,当我按一下上箭头,焦点是移到第一个控件,而不
是上一个,能再赐教吗?谢谢!
 

第一个问题,将Form的KeyPreview设置为True,在Form的OnKeyDown事件中,
if Key = VK_UP then
Perform(WM_NEXTDLGCTL, 1, 0)
else if Key = VK_DOWN then
Perform(WM_NEXTDLGCTL, 0, 0)
 
to 影子:
你说对了,简单易懂,你真行,请到以下拿50分。
http://www.delphibbs.com/delphibbs/dispq.asp?lid=1255534
 

这些东西搜索一下就有了,我很笨的。[:D]
 
to 冰雪
我给你的方法是当按下一个按钮时发生。
如果你要实现你的可以改为
SelectNext(ActiveControl,False,False);
但当然是影子给的方法更好,它是直接发送消息。另外我有多次帮过你吗?
 
第3个问题: 我认为在edit1的onclick里输入edit1.selectall;
当你的鼠标点击edit时就可以自动选择了,不知道你是不是这样想的!
 
接受答案了.
 
后退
顶部