delphi 2010 为什么WM_GETTEXT只能取一个字节啊?

[kill222]

procedure TForm1.FormCreate(Sender: TObject);
var
arr: array[0..255] of AnsiChar;
begin
form1.Caption:='Form1';
SendMessage(form1.Handle,WM_GETTEXT,255,Integer(@arr));
form1.Caption:=arr;
end;

总是只能取到第一个字节F

[pathletboy]

因为你的Form1.Caption是unicode

procedure TForm1.FormCreate(Sender: TObject);
var
arr: array[0..255] of Char;
begin
form1.Caption:='Form1';
SendMessage(form1.Handle,WM_GETTEXT,255,Integer(@arr));
form1.Caption:=arr;
end;

[kill222]

谢谢,实在是分不清什么时候用Char什么时候用AnsiChar