入门级问题，不好意思，实在没分了(5分)

我在form里面放了个edit和一个button,我想用WM_GETTEXT消息获取edit的text内容
然后把它赋给button的caption,代码如下
SendMessage(Edit1.Text,WM_GETTEXT,Length(Edit1.Text),?);
按照帮助

WM_GETTEXT
wParam = (WPARAM) cchTextMax; // number of characters to copy
lParam = (LPARAM) lpszText; // address of buffer for text

?处本来应该为一个缓冲区的指针，但是SendMessage要求此处为integer
？？？

强制类型转化就可以了，把指针转换为正型

good,一语点醒梦中人
var s:array[0..6] of char;
begin
SendMessage( Edit1.Handle,WM_GETTEXT,length(edit1.Text)+1,integer(@s));
button1.Caption:=s;
end;
就是有点别扭，呵呵