procedure TForm1.DateTimePicker1Change(Sender: TObject); begin DateTimePicker2.MinDate := DateTimePicker1.Date; lblTime1.Caption := DateTimeToStr(DateTimePicker1.Date); end ; procedure TForm1.DateTimePicker2Change(Sender: TObject); begin lblTime2.Caption : = DateTimeToStr(DateTimePicker2.Date) end;Contrairement à toute attente, le fait d'affecter la valeur de la propriété Date de DateTimePicker1 à DateTimePicker2.MinDate, affectes aussi l'heure.
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question