1,183
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
gyk120 2010-01-16
- 打赏
- 举报
SendMessage(handle,WM_GETTEXT,sizeof(buf),Integer(@buf));
句柄可以通过findwindow去取
句柄可以通过findwindow去取
slmax1 2010-01-16
- 打赏
- 举报
都被人家回答了
cmeagle 2010-01-13
- 打赏
- 举报
关键要知道要获取text对象的句柄handle
然后直接SendMessage(handle,WM_GETTEXT,sizeof(buf),Integer(@buf));
然后直接SendMessage(handle,WM_GETTEXT,sizeof(buf),Integer(@buf));
dd_zhouqian 2010-01-13
- 打赏
- 举报
up
kfcoffe 2010-01-13
- 打赏
- 举报
function GetText(Wnd : HWND) : string;
var
textlength : integer;
text : PChar;
begin
textlength:=SendMessage(Wnd,WM_GETTEXTLENGTH,0,0);
if textlength=0 then
Result := ''
else begin
getmem(text,textlength+1);
SendMessage(Wnd,WM_GETTEXT,textlength+1,Integer(text));
Result:=text;
freemem(text);
end;
end;
