DateTimePicker et format particulier des heures

Version imprimable

21/07/2006, 23h50
Sunchaser

DateTimePicker et format particulier des heures

Bonsoir,

J'ai viens de tomber sur un os...Dans un TDateTimePicker, avec la propriété Kind a dtkTime, j'ai besoin de 'bloquer' le changement des valeurs pour les minutes afin qu'il ne soit possible de se déplacer que de quart d'heure en quart d'heure...
Je ne sais pas vraimment comment m'y prendre.
J'ai bien peur de devoir passer par un composant 'fait main', dérivé de TDateTimePicker ou d'un ancêtre du même genre.Cela ne s'enchante guère a priori surtout parceque je n'ai - la non plus - pas trop d'idée pour savoir par ou commencer.
Avez vous des idées a ce sujet ?

Sinon, ya peut être des composants de ce genre sur le net...?

Merci
@ + ;)
22/07/2006, 11h19
henderson

Salut !

Je pense qu'en dérivant de TDateTimePicker tu risques d'hériter du problème. Je serais tenté de conseiller de développer un objet fonctionnant selon ton principe.
Sous la forme d'un composant à demeure ou ponctuel ?

A plus !
22/07/2006, 14h15
Sunchaser

Bonjour,

Effectivement, j'etais en train d'essayer cette histoire de dérivé d'un TDateTimePicker (ou d'un TCommonCalendar ?) mais c'est pas gagné...
Sinon, a priori j'aurai plutôt vu un composant a demeure.

@ + ;)
22/07/2006, 15h35
blondelle

Cantrelle a ecrit:

Citation:

Bonjour,

Effectivement, j'etais en train d'essayer cette histoire de dérivé d'un TDateTimePicker (ou d'un TCommonCalendar ?) mais c'est pas gagné...
Sinon, a priori j'aurai plutôt vu un composant a demeure.

apparament c'est une combobox qui affiche soit la date soit l'heure.
est ce que tu ne peut pas utiliser une combobox et un timer qui affiche tous le 15 minutes comme tu le souhaite
22/07/2006, 15h48
Sunchaser

Salut,
Non, en fait il ne s'agit pas d'un problème d'affichage réglé dans le temps mais le fait de ne laisser la possibilté a l'utilisateur que de passer de quart d'heures en quart d'heures lorsqu'il selectionne un horaire.
(la propriété Kind est donc a dtkTime, pour mémoire)
Que ce soit dans le click sur les flèches 'Up-Down', soit si il tente une saisie directe de l'heure voulu dans le composant.
22/07/2006, 16h18
henderson

Salut !

Et dans les événements OnChange ou OnUserInput du TDateTimePicker ?

A plus !
22/07/2006, 16h22
blondelle

Ne peut tu pas faire un teste sur l'heure tu stock a partir de t = 0 par exemple 16h00, tu stock 16h15 ton T = 0 + 15mn, puis suivant le besoin tu fait un teste sur l'heure si elle n'est pas egale ou sup a 16h15 tu ne fais rien, sinon tu affiche 16h15 ou tu bloque l'acces a la modif et ainsi de suite
Pour les sauts de 15mn en 15mn tu utilise un timer.
22/07/2006, 16h43
blondelle

Tu peu entrer dans un StringGrid tes heures de 0h00 a 24h00 et en fonction de l'heure entree tu fais un teste pour savoir si l'heure entree et dans la fourchette des 15 mn et tu affiche soit l'heure inf soit l'heure sup en fonction de ce que tu a decide.
22/07/2006, 17h10
blondelle

Independement de l'heure tu peu faire un teste sur les minutes.

00
15
45
30

est ce que les minutes sont comprise entre 00mn et 15mn
est ce que les minutes sont comprise entre 15mn et 30mn
est ce que les minutes sont comprise entre 30mn et 45mn
est ce que les minutes sont comprise entre 45mn et 00mn
et tu excute tes conditions d'affichage

Salut !

J'ai essayé ceci :

Code:

1
2
3
4
5
6
7
8
unsigned short hour;
unsigned short min;
unsigned short sec;
unsigned short msec;
 
unsigned short year;
unsigned short month;
unsigned short day;

Code:

1
2
3
4
5
6
7
8
void __fastcall TForm1::DateTimePicker1Change(TObject *Sender)
{
DateTimePicker1->DateTime.DecodeDate(&year, &month, &day);
DateTimePicker1->DateTime.DecodeTime(&hour, &min, &sec, &msec);
min = (min / 15) * 15;
DateTimePicker1->Time = TDateTime(year, month, day) +
                        TDateTime(hour, min, sec, msec);
}

A améliorer sans doute !

A plus !

22/07/2006, 17h33
Sunchaser

Re,

Désolé, j'étais parti m'occuper du BB...;)
Et bien merci pour vos réponses, je viens de tester la dernière proposition d'henderson, et celle ci m'a l'air tout a fait en phase avec ce que je voulais faire.
Reste a savoir pourquoi je ne peut que modifier les minutes en cliquant sur la flèche du bas, celle du haut restant inactive. (mais si ya que ça, ça va pas trop m'handicaper)
Ah si ! J'oubliais...faut que je trouve un psy pour qu'il me dise pourquoi j'envisage toujours les solutions les plus compliquées...:mouarf:

Merci beaucoup pour votre aide,
Bon ap
@ + ;)

Salut !

Si c'est indispensable :

Code:

unsigned short prev_min;

Le code pour la OnChange devient :
Code:

1 2 3 4 5 6 7 DateTimePicker1->DateTime.DecodeDate(&year, &month, &day); DateTimePicker1->DateTime.DecodeTime(&hour, &min, &sec, &msec); if((min - prev_min) == 1) min = (min + 14) % 60; min = (min / 15) * 15; DateTimePicker1->Time = TDateTime(year, month, day) + TDateTime(hour, min, sec, msec); prev_min = min;
Ca fonctionne bien pour les flèches mais pour une saisie par caractères... c'est un peu plus... comment dire... poétique...;)

A plus !

04/08/2006, 01h50
pottiez

Pour la saisie manuelle il suffit d'ajouter le code mis dans le OnChange dans l'evenement OnUserInput et de mettre la propriété ParseInput du TDateTimePicher à la valeur true.

Voila si ca peut aider quelqu'un