如何让comboBox控件具有ReadOnly的功能！

Question

如何让comboBox控件具有ReadOnly的功能！

Answer 1

procedure TForm1.comboBox1KeyPress(Sender:TObject; var Key:Char);
begin
  key:=#0;
end;

Answer 2

ComboBox1.Style:= csDropDownList; 
这个就只读了。

Answer 3

ComboBox1.Style:= csDropDownList;

Answer 4

To  pazee(耙子) :你说的这个方法是可以，但是破坏了这中操作
ComboBoxType.Text:=ComboBoxType.Items[0];
如果设置那个属性，这个默认值就没有了！

Answer 5

同意csDropDownList
令：在formonshow里加上ComboBoxType.Text:=ComboBoxType.Items[0];就可以实现默认了

Answer 6

设计期间可以把combobox的style属性设成除simple和dropdown的任何一种就行了。
运行期间加代码：combobox1.style:=csdropdownlist;就行了。

Answer 7

ComboBox1.Style:= csDropDownList;