Hinzufügen einer Checkbox cxGridDBColumn (DateEdit)
-
04-10-2019 - |
Frage
ich mit Delphi BDS 2006 und haben eine DevExpress cxGridDBColumn mit Eigenschaften zu DateEdit gesetzt und habe mich gefragt, ob es möglich ist, eine Checkbox zum angezeigten Datum Zeitauswahl Popup hinzufügen?
Lösung
Hier ist eine schnelle Hack, die Sie diese Funktion implementieren sollten helfen. Allerdings sollten Sie das Kontrollkästchen selbst behandeln. Ich habe dies für den Standalone-Editor getan, aber der gleiche Ansatz wird mit dem Inplace Editor arbeiten:
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;
Andere Tipps
Ich bin nicht sicher, dass ich verstehe, was Sie erreichen wollen. Wie auch immer, es ist unmöglich, ohne eine benutzerdefinierte cxEditor zu schaffen, die diesen Look & Feel unterstützt und die gewünschte Funktionalität.
Lizenziert unter: CC-BY-SA mit Zuschreibung
Nicht verbunden mit StackOverflow