这是一个得到传奇输入框的例子,但就是得不到输入的数据  .Button1Click后..有返回showmessage,但返回的是空,我是用的逐鹿中原传奇Form1: TForm1;
  name:Array   [0..100]   Of   Char;
  hwnd1,hwnd2,temp:hwnd;
implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);
begin
  hwnd1:=FindWindow('TFrmMain','legend of mir2');
  hwnd2:=FindWindowEx(hwnd1,0,'TEdit',0);
  if hwnd2<>0 then
  begin
    temp:=FindWindowEx(hwnd1,0,'TEdit',0);
    sendmessage(temp,WM_GETTEXT,100,Longint(name));     showmessage(name);
    end;
end;end.