为什么tedit的selectall 属性没有效果？

Question

我的一个程序中 edit的select属性设为true，
但是鼠标点进去时，其中的文本没有被选中，
这是怎么回事？

Answer 1

sorry，是Edit的selectall属性已设为true。

Answer 2

edit1.SelectAll;
  edit1.SetFocus;

Answer 3

我需要的效果是鼠标直接点进edit时，里面的内容自动全选。
另外，属性selectall难道不是实现这个功能的吗？

Answer 4

autoselect只对setfocus管用，用鼠标不行，要不你在onclick里写selectall

Answer 5

procedure TForm1.Edit1Click(Sender: TObject);
begin
  TEdit(Sender).SelectAll;
end;