Un DateTimePicker inférieur à un autre dateTimePicker

Salut!

 

Juste une simple logique qui me loupe un peu.

Pouvez-vous m'aider s.v.p:

J'ai deux datetimpickers (datetimpicker1) et (datetimpicker2)

Je veux juste qu'à partir de mon évènement OnClick de mon datetimepicker1 que je dise correctement: si la date de mon datetimpicker1 est inferieur à la date de mon datetimpicker3 affiche un message.

Voici comment j'ai procedé mais ça loupe un peu

.....On Click..... 

If datetostr (datetimepicker2.datetime) > datetimepicker3 then begin

End else

showMessage('document expiré');

Merci d'avance.

LunaSoft

Bonjour

Personnellement j'utilise le code qui suit pour savoir si la date de DTP1 (DateTimePicker) est Supérieure à DTP2

var  Year, Month, Day: Word;
     Diff:Integer;
begin
  DecodeDate(DTPDD.Date, Year, Month, Day); DTPE=DateTimePicker Date de Début
  DecodeDate(DTPDF.Date, Year, Month, Day); DTPE=DateTimePicker Date de Fin
  Diff:=Trunc(DTPDL.Date)-Trunc(DTPDE.Date); Diff=Différence représenté en nombre de jours

 if Diff <0 then; si la différence est inférieure à zéro alors
             ShowMessag('Bonne chance et plein de succès'); Message d'érreur

Je pense que simple mon exemple!

bonsoir,

...et datetostr(datetimepicker2.datetime) ne fonctionne pas
puisque dans ce cas, ce ne sont plus des dates mais du texte... 

cantador

- Merci Haftarifouad de m'envoyer tes codes
- Merci Cantador pour ton précieux conseil

- Grand merci a Simon Pelloquin pour ton aide...car ta ligne de code a marché à seconde.

Merci à Tous,

LunaSoft