A apower Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-18 #1 我想知道怎样向一个记事本或者其他什么可发送文字(要发送中文字的),sendkey可以发送单个字母,不能发送汉字,求助。
N Netsoft Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-19 #4 SendMessage+ WM_SetText不是很好吗?? 干吗要用SendKey呢?? 呵呵~~~~~~~~~
A apower Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-28 #5 请问Netsoft,如何用SendMessage+ WM_SetText,请指教。
影 影 子 Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-29 #6 procedure TForm1.Button1Click(Sender: TObject); var H: HWND; p: pchar; begin H := FindWindowEx(FindWindow(pchar('Notepad'),nil),0,pchar('Edit'),nil); p := pchar(memo1.Text);//中英文都是一样的 SendMessage(H,WM_SETTEXT,Length(p),lParam(p)); end;
procedure TForm1.Button1Click(Sender: TObject); var H: HWND; p: pchar; begin H := FindWindowEx(FindWindow(pchar('Notepad'),nil),0,pchar('Edit'),nil); p := pchar(memo1.Text);//中英文都是一样的 SendMessage(H,WM_SETTEXT,Length(p),lParam(p)); end;
I indexhome Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-29 #7 楼上一位已经给出了最简单的向记事本发送文字的了,很长的东西都可以发送的
A apower Unregistered / Unconfirmed GUEST, unregistred user! 2003-12-04 #10 如果是向某一程序,如仿真终端呢?如何确认classname. 也就是:FindWindowEx(FindWindow(pchar('Notepad'),nil),0,pchar('Edit'),nil); 怎样确认'notepad','edit',这两个东西。
如果是向某一程序,如仿真终端呢?如何确认classname. 也就是:FindWindowEx(FindWindow(pchar('Notepad'),nil),0,pchar('Edit'),nil); 怎样确认'notepad','edit',这两个东西。
W wjh_wy Unregistered / Unconfirmed GUEST, unregistred user! 2003-12-04 #11 to apower 用spy++软件或者到我的网络空间下载一个控件查器,是我自己写的。 http://www.efile.com.cn/?cjsh