请教如何实现cxDateEdit控件只能通过下拉框选择日期，无法再编辑框输入日期

cxDateEdit控件默认可以手输日期也可以通过下拉框选择日期，现在我要禁止cxDateEdit无法手输日期，只能通过下拉框选择，请问如何实现。

2 个解决方案

#1

可以试试在cxDateEdit的OnKeypress事件里用这段代码


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

#2

引用 1 楼 sonicer 的回复:

可以试试在cxDateEdit的OnKeypress事件里用这段代码


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

你说得没错，我怎么就没想到了，谢谢。