用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;
运行后,就可以实现了。