Discussion :

[the big ben 5]

Bonjour,

J essaie d'utiliser un DateTimePicker avec une checkBox.
Le but est que lorsque je décheck ma box, on prenne une action par défaut (date du jour - x jours) et j'ai donc un joli label a coté de mon dateTimePicker expliquant ce que fait l'action par défaut.

Le truc c est que je n'arrive pas à changer le texte en grisé qui apparait quand même dans le datetimepicker pour y mettre la date en question et en meme temps détchecker ma box.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
DTPLivraison.set_Text(dateLivraison.ToString);
DTPLivraison.Checked := false;
LabelDTPLivraison.Visible := true;

Si j'attribue un texte alors il devient impossible de la décocher tout de suite. Comment faire?

D'avance merci

Ben

[zazaraignée]

Salut

DTPLivraison est ton DatetimePicker ? Ça m'étonnerais que tu puisse le cocher comme une case à cocher!

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
procedure TForm1.CheckBox1Click(Sender: TObject);
begin
if checkbox1.Checked then
    datetimepicker1.Date := datetimepicker1.Date-3
  else
    datetimepicker1.Date := now
end;

[the big ben 5]

Oui c'est mon DateTimePicker et quand tu active l'option adéquate, oui u peux la cocher (sous delphi 8 )