简单的问题，up有分

Question

请问怎么实现在combobox中键盘输入无效，除tab，回车等功能键外？小弟正在练习做个简单的控件（只读combobox）

Answer 1

在combobox的OnKeyPress事件中
procedure TForm1.ComboBox1KeyPress(Sender: TObject; var Key: Char);
begin
  if not (Key in [#8,#9,#13]) then Key := #0;
end;

Answer 2

请看：http://expert.csdn.net/Expert/topic/1538/1538380.xml?temp=.2229273