Discussion :

[bertrand_declerck]

Bonjour à tous

j'utilise actuellement le composant datetimepicker et je me pose une question toute simple :

Peut-on empêcher la saisie d'une date d'un datetimepicker si elle dépasse un intervalle de mois du choisis par mes soins du style :

'choisir une date entre le mois d'octobre à décembre inclus seulement' ?

Toute autre date non valide se verra mentionnée par un showmessage lorsqu'on voudra faire défiler les autres mois du composant datetimepicker !


merci de me donner des pistes car c'est une chose qui est à mon sens pratique et ergonomique.

[/quote]

[SubZero2]

Il suffit peut etre simplement de tester la valeur choisie au moment d'un clic sur un bouton valider ... ou lorsque le DateTimePicker perd son focus ...

Code :

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

1
2
Si (DTP.Date < DateBasse) or (DTP.Date > DateHaute) then
   Message('Pabossa !!!');

[Rayek]

Dans le onchange et le oncloseup du datetimepicker tu mets par exemple :

Onchange : Pour que ca vérifie lors de la saisie manuelle
Oncloseup : Pour que ca vérifie lors de la sélection avec le calendier du datetimepicker.

Code :

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

1
2
3
4
 
if ((Sender as TDateTimePicker).Date < Now - 30) or
    ((Sender as TDateTimePicker).Date > now + 30) then
    (Sender as TDateTimePicker).Date := now;

Cet exemple met la date du jour si la valeur sélectionnée n'est pas entre date du jour - 30 jours et date du jour + 30 jours

[Magnus]

Dans le onchange et le oncloseup du datetimepicker tu mets par exemple :...

un conseil : n'utilise pas l'événement OnCloseUp car il n'est pas géré de la même manière par le clavier et la souris =>
lors de la l'utilisation du clavier il me semble que cet événément n'est pas généré alors qu'il l'est avec la souris.

J'ai posté un problème à ce sujet et je l'ai résolu grâce à l'événement OnExit pour autant que je me rappelle.

[bertrand_declerck]

Ok je vais tester cela après le bureau, je vous dis cela demain.

merci de vos conseils avisés

bertrand

[Rayek]

Dans le onchange et le oncloseup du datetimepicker tu mets par exemple :...

un conseil : n'utilise pas l'événement OnCloseUp car il n'est pas géré de la même manière par le clavier et la souris =>
lors de la l'utilisation du clavier il me semble que cet événément n'est pas généré alors qu'il l'est avec la souris.

J'ai posté un problème à ce sujet et je l'ai résolu grâce à l'événement OnExit pour autant que je me rappelle.

C'est pour ca que je lui dit de mettre aussi dans le onchange la meme fonction.

[Magnus]

C'est pour ca que je lui dit de mettre aussi dans le onchange la meme fonction.

Effectivement, je n'avais pas fait attention

Mon conseil n'est donc à considérer que lorsque l'on utilise l'événement OnCloseUp SEUL.

[bertrand_declerck]

Le code est nickel mais subsiste une question ?

Vous m'avez donné un code

Code :

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

1
2
3
 
((Sender as TDateTimePicker).Date < Now - 30) or 
    ((Sender as TDateTimePicker).Date > now + 30) then

Ne serait-il pas possible de remplacer le ' Now - 30 ' par Date < le mois de janvier si cela est possible ?

[SubZero2]

Code :

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

(Now - 30)

et

Code :

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

(Now + 30)

sont tes 2 bornes .... tu mets ce que tu veux comme bornes

[bertrand_declerck]

Le problème est qu'à cause du now, si on prend la date d'aujord'hui soit le 20/09/2005, si je fais + 30, je dépasse la limite éventuelle de fin septembre !

en fait j'aimerai trouver les valeurs de janvier, février du datetimepicker directement !

en tous cas merci à toi

[SubZero2]

Heu .... le Now est pas obligatoire ..... tu peut tres bien mettre :

Code :

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

( DTP.Date > 01/01/2005) and ( DTP.Date < 28/02/2005)

[bertrand_declerck]

parfait subzero, tu as répondu à ma dernière interrogation !

merci à toi