TEdiでクリックしたときに表示している文字列を選択するために（TComboBox のように）
procedure TForm1.Edit1Enter(Sender: TObject);
begin
　Edit1.SelectAll;
end;

としても、文字列は選択されません。なんででしょ？