怎么样获取字符？

Question

通过句柄，怎样获取另一程序中的一个控件edit的text的值？

Answer 1

另一程序与当前程序是在一个工程文件里吗？在
implementation
uses
   单元名称然后应该就可以获取了吧.

Answer 2

已经问过了吧
获得句柄后
SendMessage WM_GETTEXT搜一个吧var  
  point: TPoint;  
  handle: HWND;  
  len: integer;  
  s: array [0..255] of Char;  
begin  
    GetCursorPos(point);  
    handle:=windowfrompoint(mousepoint);  
    len := SendMessage(handle, WM_GETTEXTLENGTH, 0, 0) + 1;  
    SendMessage(handle, WM_GETTEXT, len, Longint(@s));
    //...
end;
在坛子里搜索“SendMessage  WM_GETTEXT delphi”，你会找到更多

Answer 3

handle:=windowfrompoint(mousepoint);  
这一句中变量要改一下，更新如下
获取句柄的方法按需更新
供参考var
  point: TPoint;
  handle: HWND; 
  len: integer; 
  s: array [0..255] of Char; 
begin 
  GetCursorPos(point); 
  handle := WindowFromPoint(point); 
  len := SendMessage(handle, WM_GETTEXTLENGTH, 0, 0) + 1; 
  SendMessage(handle, WM_GETTEXT, len, Longint(@s)); 
  //... 
end;