Добавление флажков в cxgriddbcolumn (dateededit)

Question

Я использую Delphi BDS 2006 и иметь DEVEXPRESPENT CXGRIDDBCONUMN со свойствами, установленными на DEATEEDEDIT и было заданным вопросом, можно ли добавить флажок на отображаемую дату время соперника?

Answer 1

Вот быстрый взлом, который должен помочь вам реализовать эту функцию. Однако вы должны обрабатывать флажок самостоятельно. Однако я сделал это для автономного редактора, однако тот же подход будет работать с редактором Iflace:

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;

Answer 2

Я не уверен, что понимаю, что вы хотите достичь. Во всяком случае, это невозможно без создания пользовательского CXEDITOR, который поддерживает этот внешний вид и желаемую функциональность.