wm gettext 问题高手快来！

lcddda 2010-01-13 03:06:26

怎么才可以用这个消息获取edit1框的内容请给下代码谢谢

...全文

88 5 打赏收藏举报

写回复

5 条回复

切换为时间正序

请发表友善的回复…

发表回复

gyk120 2010-01-16

打赏
举报

SendMessage(handle,WM_GETTEXT,sizeof(buf),Integer(@buf));
句柄可以通过findwindow去取

slmax1 2010-01-16

打赏
举报

都被人家回答了

cmeagle 2010-01-13

打赏
举报

关键要知道要获取text对象的句柄handle
然后直接SendMessage(handle,WM_GETTEXT,sizeof(buf),Integer(@buf));

dd_zhouqian 2010-01-13

打赏
举报

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;