B baifeng Unregistered / Unconfirmed GUEST, unregistred user! 2001-10-12 #1 当我知道A窗口句柄后, 我怎么取得A窗口文本框的内容? 我怎么修改A窗口文本框的内容? 最好有范例。。 回答正确即可给分。
W wzisme Unregistered / Unconfirmed GUEST, unregistred user! 2001-10-12 #5 设A窗口句柄为ahandle 程序如下: var strchar; hedit:hwnd; begin hedit:=findwindowex(ahandle,0,'tedit',nil);//取得A窗口下文本框的句柄,类型为tedit getmem(str,255);//分配内存 getwindowtext(hedit,str,255);//取得内容 label1.caption:=strpas(str);//内容显示在label1中 FREEMEM(str);//释放内存 设置内容为 SendMessage(hedit, WM_SETTEXT,4//长度, LPARAM(pchar("good")));
设A窗口句柄为ahandle 程序如下: var strchar; hedit:hwnd; begin hedit:=findwindowex(ahandle,0,'tedit',nil);//取得A窗口下文本框的句柄,类型为tedit getmem(str,255);//分配内存 getwindowtext(hedit,str,255);//取得内容 label1.caption:=strpas(str);//内容显示在label1中 FREEMEM(str);//释放内存 设置内容为 SendMessage(hedit, WM_SETTEXT,4//长度, LPARAM(pchar("good")));