如何取到另一个程序里EDIT1的内容啊。

Question

如何取到另一个程序里EDIT1的内容啊。

Answer 1

只要获得edit的句柄就可以取到内容。
所以你可以用findwindow和findwindowex获得句柄后再说

Answer 2

SendMessage的WM_GETTEXT参数_____________________
http://lysoft.7u7.net

Answer 3

1.  findwindow获取某个窗体的HANDLE
2.  遍历查找 TEdit( TWinControl( xHandle ).Controls[i] ).Text

Answer 4

TEdit( TWinControl( xHandle ).Controls[i] ).Text
这种方法不行, 可能只有 Delphi写的程序才支持的.用findwindow和findwindowex获得句柄后,再用
SendMessage;var
  s:array[0..255] of Char;
  dw:DWORD;
begin
  SendMessage(Handle, WM_GETTEXT,Length(S), Integer(@S));
  ShowMessage(s);
end;

Answer 5

procedure TForm1.Button2Click(Sender: TObject);
var  HWindow,hedit: THandle; //句本柄变量
szText: Array[0..255] Of char;   //得到的字符串
Begin
   HWindow := 0;
   While true Do
      Begin
       HWindow := FindWindowEx(0, HWindow, 'SciCalc', Nil);//找计算器的窗体
       if HWindow=0 then exit;
       If HWindow <> 0 Then
        Begin
        hEdit := FindWindowEx(hwindow, 0, 'Edit', Nil);  //找到edit文本框
        if HEdit<>0 then
        begin
      SendMessage(hEdit, WM_GetTEXT, 256,integer(@szText[0])); //取值
      edit1.Text:= szText; //符值
     break;
    End;
    end;
  end;
End;

Answer 6

var b: array [0..255] of Char;
begin
  SendMessage(1050930, WM_GETTEXT, SizeOf(b), Integer(@b));
  Edit1.Text := b;
end;_____________________
http://lysoft.7u7.net

Answer 7

先找到另一个程序的edit1的句柄，然后sendmessage(hwnd,wm_gettext,size,buf)就可以了

Answer 8

http://www.somade.com/是个很专业的技术社区,去那里找找吧,或许有你要的答案~