Delphi 向cxGridDBColumn（DateEdit）添加复选框

我正在使用Delphi BDS 2006，并且有一个属性设置为DateEdit的DevExpress CXGriddb列，我想知道是否可以在显示的日期时间选择器弹出窗口中添加复选框？

我不确定我是否理解您希望实现的目标。无论如何，如果不创建一个支持此外观和所需功能的自定义cxEditor，这是不可能的。

下面是一个可以帮助您实现此功能的快速技巧。但是，您应该自己处理该复选框。我已经为独立编辑器完成了这项工作，但是，同样的方法也适用于inplace编辑器：

procedure TForm1.cxDateEdit1PropertiesPopup(Sender: TObject);
var
  AEdit: TcxDateEdit;
  ACalendar: TcxPopupCalendar;
  ACheckBox: TcxCheckBox;
begin
  AEdit := TcxDateEdit(Sender);
  if AEdit.Tag <> 1 then
  begin
    AEdit.Tag := 1;
    ACalendar := TcxPopupCalendar(AEdit.Properties.PopupControl);
    ACheckBox := TcxCheckBox.Create(Self);
    ACheckBox.Parent := ACalendar.Parent;
    ACheckBox.Align := alBottom;
    ACheckBox.Transparent := True;
    ACalendar.Parent.Height := ACalendar.Parent.Height + ACheckBox.Height;
  end;
end;

过程TForm1.cxDateEdit1PropertiesPopup（发送方：ToObject）；
变量
AEdit:TcxDateEdit；
ACalendar:TcxPopupCalendar；
ACheckBox:TcxCheckBox；
开始
AEdit:=TcxDateEdit（发送方）；
如果是，则标记1
开始
AEdit.Tag:=1；
ACalendar:=TcxPopupCalendar（AEdit.Properties.PopupControl）；
ACheckBox:=TcxCheckBox.Create（Self）；
ACheckBox.Parent:=ACalendar.Parent；
ACheckBox.Align:=alBottom；
ACheckBox.Transparent:=True；
ACalendar.Parent.Height:=ACalendar.Parent.Height+ACheckBox.Height；
结束；
结束；

Hi，我想要实现的是一个cxGrid，其中一列使用日期选择器（DateEdit）。我希望显示通常的日历下拉列表，但在底部有一个嵌入的复选框。下面是一个快速破解，它应该可以帮助您：过程TForm1.cxDateEdit1PropertiesPopup（发送者：TObject）；变量AEdit:TcxDateEdit；ACalendar:TcxPopupCalendar；ACheckBox:TcxCheckBox；开始AEdit:=TcxDateEdit（发送方）；如果是AEdit.Tag 1，则开始AEdit.Tag:=1；ACalendar:=TcxPopupCalendar（AEdit.Properties.PopupControl）；ACheckBox:=TcxCheckBox.Create（Self）；ACheckBox.Parent:=ACalendar.Parent；ACheckBox.Align:=alBottom；ACheckBox.Transparent:=True；ACalendar.Parent.Height:=ACalendar.Parent.Height+ACheckBox.Height；结束；结束；那太完美了，正是我想要的！谢谢