用消息改变EDIT内容

Question

比如我知道别人EXE中的一个EDIT控件句柄,我想写个程序,用来修改这个EDIT中显示的内容,
发送什么消息可以办到.

Answer 1

{举例}procedure TForm1.Button1Click(Sender: TObject);
var
  S: string;
begin
  S := 'abcdefg';
  SendMessage(aHandle, WM_SetText, 7, integer(PChar(S)));
end;

Answer 2

{举例}procedure TForm1.Button1Click(Sender: TObject);
var
  S: string;
begin
  S := 'abcdefg';
  
  SendMessage(youeditHandle, WM_SetText, length(s), integer(PChar(S)));
end;
小小修改

Answer 3

SendMessage(youeditHandle, WM_SetText, length(s), integer(PChar('asdfasdf'))); 

Answer 4

SendMessage(Edit1.Handle,WM_SETTEXT,0,Longint(PChar('你好')));

Answer 5

SendMessage(Edit1.Handle,WM_SETTEXT,0,Longint(PChar('你好')));