如何读取另一程序里面的内容？

Question

我想问一下：例如计算器里面有个显示结果的文本框，当算了结果以后，我应该
            如何把结果传递给 用delphi编写 的程序的 文本框 中？不要告诉
            我用ctrl+c啊！
            当然我是希望从获取句柄开始，因为有的程序是没有“计算器”
            这样简单的标题的：）请给我代码

Answer 1

我知道是要用findwindow得到handle，用findwindowex得到控件的handle，但是我就是看不懂delphi的帮助文件，请问谁有delphi的api中文帮助（有例子那种）
那个wm_settext要怎样用？

Answer 2

现在是什么年代啊，不会字的人都来混分？！牛那么大的字写着“我就是看不懂delphi的帮助文件”！！！！！！！！！！！！！
我已经把问题解决了，不过不能给分我自己！

Answer 3

postmessage(findwindows(...),WM_GETTEXT,最大长度,lparam(pchar))

Answer 4

procedure TForm1.Button1Click(Sender: TObject);
var
str1:array[0..255] of char;
HWnd1,cal: HWnd;
begin
HWnd1 := FindWindow('notepad',nil );
cal :=findwindowex(hwnd1,0,'edit',nil);
SendMessage(cal,WM_GETTEXT,127,integer(@str1));
showmessage(str1);
end;