Question

delphi 7 如何在程序外的光标处输出一段字符串和数字？大侠们告诉我该怎么做啊？谢谢了...

在程序外任意获得光标的窗口中光标处输出一段字符串或数字怎做？比如打开一个word或txt时，自动在word或txt窗口的光标处输出指定的某个数字。
我在网上看到有这样做
Delphi代码
SendMessage(Form1.Handle,WM_TEST_END,Integer(@MyId),1);
其中MyId是要返回的字符串
在主窗口中使用如下代码：
先在public中加入消息函数的声明
Delphi代码
procedure WMTestEnd(var AMsg:TMessage);message WM_TEST_END;//消息函数
其中WM_TEST_END是自定义的消息
再在implementation写函数
Delphi代码
procedure TForm1.WMTestEnd(var AMsg:TMessage);
var
s:string;
begin
s:=string(Pointer(AMsg.wParam)^);
Memo1.Lines.Add(s);
end;

我复制运行了报了这样的错：Undeclared identifier:'WM_TEST_END'
我知道WM_TEST_END是自定义的消息，该怎么定义？我是菜鸟，麻烦大家给个完整的代码行吗？

我只是想在我运行了我的delphi程序后能在别的窗口光标处输出几个数字，能不能给个完整的代码啊，求求你们了！

我没有多余的分，大侠们别嫌分少啊，帮帮忙啦！

若以下回答无法解决问题，邀请你更新回答

Answer 1

方法有二，其一是传统windows消息法，其二是模拟键盘输入法，以下详述。
一、消息法
1、获取本程序外的窗口的句柄
若需自主获取窗口句柄以达到全自动化，应当调用EnumWindow或FindWindow等API；如果不求全自动化而允许部分交互，可以使用SPY等工具，查找窗口，得到其句柄。
2、向找到的窗口发送WM_CHAR消息
发送可用SendMessage，也可用PostMessage；关于WM_CHAR的参数，可查阅MSDN。
二、模拟法
1、同上，获取被操作的窗口之句柄
2、调用API，SetForegroundWindow，将该窗口的进程提至前台
3、调用API，SendInput，向前台程序发送键盘事件；或者到网上搜索并下载一个叫做SendKey的单元，其中已经封装了SendInput，调用起来能够简便一些。

综上，想干这个活儿，还是需要了解windows的一些原理，MSDN绝对是手头必备之编程参考。

Answer 2

不是很明白你的用意
打开WORD的时候光标是自动停留在文件头的，你怎麼个光标在那就输哪？

Answer 3

我也想知道怎么做，有具体完整的源代码更好...
为什么没有人回答呢