回 帖 发 新 帖 刷新版面

主题:求软键盘制作方法~````谢!

请问大家~~~~````
    几个edit和几个button;当要在edit里输入时,点击button既可输入
    例如button1.caption为'四川'.当要在edit1里输入四川时,点击button1既可.
  (类似软键盘)!1111111111
谢谢大家!1

回复列表 (共3个回复)

沙发

procedure TForm1.Button1Click(Sender: TObject);
begin
Edit1.Text:=Button1.Caption;
end;

板凳

不是这样~````````
    我的意思是那个EDIT获得焦点,才把Button1.Caption传给它~```

3 楼

难点在于怎么知道在软键盘得到输入焦点之前,焦点在哪个窗口上。
可写一全局Dll Hook,拦截WM_KILLFOCUS消息,再在程序中把相应的动作发回该焦点。

我来回复

您尚未登录,请登录后再回复。点此登录或注册