怎么用memo1的handle来表达类似于memo1.selectall的功能？？

Question

如果只得到了handle1，还没memo1的具体名称

Answer 1

如果用sendmessage对memo是可以，可是对于listbox,richedit用em_setsel
似乎没作用~~~~

Answer 2

//这是VCL代码
procedure TCustomEdit.SelectAll;
begin
  SendMessage(Handle, EM_SETSEL, 0, -1);
end;//参考如下代码
procedure TForm1.Button1Click(Sender: TObject);
begin
  SendMessage(Memo1.Handle, EM_SETSEL, 0, -1);
end;

Answer 3

请教高人：memo是可以的，可是可是对于listbox,richedit用em_setsel
似乎没作用~~~~ 

Answer 4

//参考如下代码
procedure TForm1.Button1Click(Sender: TObject);
begin
  SendMessage(ListBox1.Handle, LB_SELITEMRANGEEX, 0, MAXWORD);
end;//ListBox1必须设置成可以多选