用Edit+ComboBox实现ComboBox只读模式

前几天在论坛里面提问，还没有得到更好的方法，然后自己想了个变通的方法。
1.在窗口中放入一个ComboBox组件；
2.在ComboBox上覆盖一个Edit组件；
3.设置Edit的ReadOnly为True；
4.设置ComboBox的TabStop设置为False；
5.在ComboBox的OnChange事件中输入下面的代码：
begin
   Edit1.Text:=ComboBox1.Text;
   Edit1.SetFocus;
end;
运行后，就可以实现了。