Domanda

I utilizzando Delphi BDS 2006 e hanno un DevExpress cxGridDBColumn con proprietà impostate per DateEdit e chiedevo se è possibile aggiungere una casella di controllo alla data ora selettore popup visualizzata?

È stato utile?

Soluzione

Ecco un trucco veloce che dovrebbe aiutare a implementare questa funzione. Tuttavia, si dovrebbe gestire la casella di controllo da soli. Ho fatto questo per l'editor standalone, tuttavia, lo stesso approccio funzionerà con l'editor 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;

Altri suggerimenti

Non sono sicuro di aver capito quello che si vuole ottenere. In ogni caso, non è possibile senza creare un cxEditor personalizzato che supporta questo look & feel e funzionalità desiderata.

Autorizzato sotto: CC-BY-SA insieme a attribuzione
Non affiliato a StackOverflow
scroll top