cxgriddbcolumn(dateedit)にチェックボックスを追加する
-
04-10-2019 - |
質問
Delphi BDS 2006を使用しており、プロパティをDateEditに設定したDevexPress CXGridDBColumnを使用しています。
解決
この機能の実装に役立つはずのクイックハックです。ただし、チェックボックスを自分で処理する必要があります。私はこれをスタンドアロンの編集者のために行いましたが、同じアプローチがInplace Editorで動作します。
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;
他のヒント
あなたが何を達成したいかを理解しているかどうかはわかりません。とにかく、この外観と希望の機能をサポートするカスタムcxeditorを作成することなく不可能です。
所属していません StackOverflow