如何向已知句柄的窗口发送文本?

Question

如何向已知句柄的窗口发送文本?比如一个名柄为3200的编辑窗口，如可才会能向它发送文本?

Answer 1

SendMessage 是个api 函数，好像有SETTEXT 事件吧，不知道SETTEXT 的前缀是什么，自己查查吧，我的机子刚重装系统，还没装什么软件。

Answer 2

var
  S: String;
begin
  S := 'aaa';
  SendMessage(Edit1.Handle, WM_SETTEXT, 0, Integer(S));
end;—————————————————————————————————
宠辱不惊，看庭前花开花落，去留无意；毁誉由人，望天上云卷云舒，聚散任风。
—————————————————————————————————

Answer 3

今天早上才发现昨天写错了，WM_SETTEXT 是消息，不是事件。

Answer 4

var
  S: String;
begin
  S := 'aaa';
  SendMessage(Edit1.Handle, WM_SETTEXT, 0, pchar(S));
end;