delphi - cxGridDBColumn (DateEdit) にチェックボックスを追加する

Question

私は Delphi BDS 2006 を使用していて、DateEdit に設定されたプロパティを持つ DevExpress cxGridDBColumn を持っています。表示される日時ピッカー ポップアップにチェックボックスを追加できるかどうか疑問に思っていましたか?

Answer 1

あなたが達成したいことを私が理解しているかどうかはわかりません。いずれにしても、このルック アンド フィールと必要な機能をサポートするカスタム cxEditor を作成しないと不可能です。

Answer 2

これは、この機能の実装に役立つ簡単なハックです。ただし、checkBox は自分で処理する必要があります。スタンドアロン エディターでこれを実行しましたが、インプレース エディターでも同じアプローチが機能します。

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;