我想通过我的程序直接向一个打开的程序（如记事本或WORD）中传送字符串，请问如何实现？

Question

例子程序中有控制word的，研究研究吧

Answer 1

to ddeng
控制word的是用自动化呢
哪能用得上呢

Answer 2

var
  hwnd1,hwndedit:HWND;
begin
  hwnd1:=FindWindow('Notepad',nil);
  hwndedit:=FindWindowEx(hwnd1,HWND(nil),'Edit',nil);
  SendMessage(hwndedit,WM_SETTEXT,0,LPARAM(PChar('xzgyb')));
end;
上面的FindWindowEx是在2000下运行的，不知98下能不能用

Answer 3

SendMessage(hwndedit,WM_SETTEXT,0,LPARAM(PChar('xzgyb')));
2个程序之间不能传递指针,内存空间是独立的.

Answer 4

我试过了可以的，好像WM_SETTEXT是采用一种特殊的方式
<<windows核心编程>>好像有介绍