紧急求救！

[TurboDing]

I := 1;
Long := Length(str);
while i <= Long do
begin
// 获得接收窗口的句柄
GetCursorPos(mPoint);
DTWND := WindowFromPoint(mPoint);
//发送虚拟键盘
SendMessage(DTWND, WM_IME_CHAR, ord(str[i]), 1);
i := i+1;
end;
str序列号字符串，这段代码在Timer.OnTimer事件中。
这段代码是实现序列号自动输入器的功能，这个代码在记事本中可以成功运行，但在含有多个Edit的序列号界面中却只能实现在第一个Edit中输入而在以后的Edit中就不模拟键盘的输入
请各位高手赐教！

[jinjazz]

GetCursorPos是鼠标的不是光标的位置

[TurboDing]

呢怎样才能得到光标的位置呢？

[jinjazz]

GetCaretPos

[TurboDing]

jinjazz(近身剪（N-P攻略）)
大哥我换成你给的函数了，但是在另一个窗口，无法实现请详细说明

[aus]

学习

[caiso]

顶一下

[TurboDing]

源码请到http://turboding.spymac.net下载