关于SendMessage,(问题没结束呢，继续来高手啊); (20分)

人在昆明 · 2003-01-20

留个箱子，给你

易名烦 · 2003-01-20

烂箱子： zoujinhe@changhong.com 薄菏：   我试了你和诸葛给我的代码，找不出光标所在的控件的HWND，怎么办？ 诸葛：   没有Key_event他是Keybd_event.

liu_sir · 2003-01-20

这是cndev上的一段代码,希望对你有用 var  _hWnd_Win,_hWnd_Edt: HWND;   nLen: Integer;   Buff: String; begin     _hWnd_Win := FindWindow('TForm1','app1');     _hWnd_Edt := FindWindowEx(_hWnd_Win,0, 'TRichEdit',nil);     if _hWnd_Edt<>0 then     Begin           Buff := GetText(_hWnd_Edt);     end;     memo1.Lines.Add(Buff); end;

诸葛白痴 · 2003-01-20

查一下一个VB的仿真键盘，用了以下几个函数： GetForegroundWindow //取得当前工作窗口 GetWindowThreadProcessId //取得窗口的进程ID AttachThreadInput //将输入消息绑到进程中，注意退出时要去除绑定 GetFocus //取得焦点窗口 PostMessage //将消息传到目录控件 还不行就把VB的源码给你了

易名烦 · 2003-01-20

谢谢，但你给我我也不懂啊。我没学过VB。 看来我只有将窗口变成当前窗口，然后再KeyBd_event了，这样就不能干其它的事情了。 非常的不好。

易名烦 · 2003-01-20

我用SendMessage(Edit1.Handle,WM_KeyDown,22,0); Edit1在当前程序中，EDIT的值无反应，怪了。 剪贴板中有数据。 其中22是CTRL+V

人在昆明 · 2003-01-20

发拉！找到句柄，模拟鼠标动作----- 按下、弹起来！

易名烦 · 2003-01-21

再在的关键问题是怎么得到光标所在的子窗体的Handle?

一少 · 2003-01-21

得到光标所在的edit的Handle，也是我想要的，听课！ 这年头怎么一听到这问题我的眼睛就发光

易名烦 · 2003-01-21

大家都想知道，来个人解答吧！

zw84611 · 2003-01-21

参考一下这个： http://www.playicq.com/dispdoc.php?t=&id=2155

易名烦 · 2003-01-21

谢谢，我下载看了。 这个是用的KeyBd_Event()，执行过程中屏幕不停晃。 如果做在我的程序中，操作者就不能做其它事情了，有点不符合使用都有的意愿。

zw84611 · 2003-01-21

你不用做得象他那样复杂。用两句话即可：   keybd_event(ord('A'), MapVirtualKey(ord('A'), 0), 0, 0);   keybd_event(ord('A'), MapVirtualKey(ord('A'), 0), KEYEVENTF_KEYUP, 0);

易名烦 · 2003-01-21

我不是只发一个“A”，只是用“A”来举个例子，实际应用中各种字符都有可能。 我想不打扰使用都做其它事情，想用SendMessage()

zw84611 · 2003-01-21

作个循环就是了。 s: string;   s := 'hello,world';   for i := 1 to length(s) do   begin     keybd_event(ord(s), MapVirtualKey(ord(s), 0), 0, 0);     keybd_event(ord(s), MapVirtualKey(ord(s), 0), KEYEVENTF_KEYUP, 0);   end; 可以作成一个函数方便调用。

爱元元的哥哥 · 2003-01-21

WindowFromPoint可以得到任意标准类的句柄（当然前提是有Handle属性） 然后发送消息，最好用PostMessage，呵呵

易名烦 · 2003-01-21

可是这个需要鼠标指向该类啊，程序执行时用户在用鼠标做其他的事情。

astros · 2003-01-21

别用WM_KEYDOWN消息，用WM_CHAR消息就行了。

诸葛白痴 · 2003-01-22

有这么复杂吗？　我试试

易名烦 · 2003-01-22

不复杂，只要得到光标所在的EDIT的Handle,一切都搞定。 但是到目前为止，还是没得到。

关于SendMessage,(问题没结束呢，继续来高手啊); (20分)

人在昆明

Unregistered / Unconfirmed

易名烦

Unregistered / Unconfirmed

liu_sir

Unregistered / Unconfirmed

诸葛白痴

Unregistered / Unconfirmed

易名烦

Unregistered / Unconfirmed

易名烦

Unregistered / Unconfirmed

人在昆明

Unregistered / Unconfirmed

易名烦

Unregistered / Unconfirmed

一少

Unregistered / Unconfirmed

易名烦

Unregistered / Unconfirmed

zw84611

Unregistered / Unconfirmed

易名烦

Unregistered / Unconfirmed

zw84611

Unregistered / Unconfirmed

易名烦

Unregistered / Unconfirmed

zw84611

Unregistered / Unconfirmed

爱元元的哥哥

Unregistered / Unconfirmed

易名烦

Unregistered / Unconfirmed

astros

Unregistered / Unconfirmed

诸葛白痴

Unregistered / Unconfirmed

易名烦

Unregistered / Unconfirmed

Similar threads