Delphi 用SendMessage取外部程序编辑框的值？已知句柄

Question

很郁闷前2天可以得到今天试了一下又得不到了啊！！
源代码
  var
  MsgResultBuf: integer;      //记录信息缓冲区大小
  MsgResultLength: longint;   //信息长度
begin
  MsgResultLength := SendMessage(Handle, WM_GETTEXTLENGTH, 0, 0) + 1;    //获取指定句柄控件的文本长度
  GetMem(Msg, MsgResultLength);                                          //为要读取的信息分配内存
  MsgResultBuf := LongInt(Msg);                                          //定义缓冲区大小
  SendMessage(Handle, WM_GETTEXT, MsgResultLength, MsgResultBuf);
  ShowMessage(IntToStr(MsgResultLength));
  FreeMem(Msg, 0);现在是得不到MsgResultLength了
那位大侠帮帮忙啊，在线急等！！！

Answer 1

就是获取文本编辑框（如：EDIT）里的值，Handle文本编辑框的句柄
初学DELPHI代码肯定会有问题的，请大家多指点