composant TDateTimePicker qui reste figé

Version imprimable

26/04/2006, 11h43
wassila

composant TDateTimePicker qui reste figé

Bonjour à tous!

J'utilise deux composants TDateTimePicker, un pour la date est un pour l'horaire.

Quand j'execute le programme, les deux composants prennent la date et l'heure du pc, mais reste figés , le problème se pose surtout pour l'heure, car j'ai besoin d'avoir un genre d'horloge.

Merci d'avance pour votre aide
26/04/2006, 12h03
pottiez
Salut, avec un composant Timer, tu peut généré un événement toute les secondes, et mettre alors a jour ton TDateTimePicker, tu peut par exemple prendre l'heure courante est la mettre dans ton composant comme ceci :
Code:

1 2 3 4 5 void __fastcall TForm1::Timer1Timer(TObject *Sender) { DateTimePicker1->Time = Time() ; } //---------------------------------------------------------------------------
Le seul probleme est qu'ici si tu change la valeur de ton heure, qui est l'utilité de ton TDateTimePicker, elle va se remettre a jour la seconde qui suit, il faudrais donc initialisé ton TdateTimePicker au démarrage puis toute les secondes (grace à l'evenement du Timer), tu ajoute une seconde a la valeur prècedente de tonTDateTimePicker, mais je te laisse faire le reste.
A plus
26/04/2006, 13h10
wassila

Merci pour ta réponse

J'ai déjà mis ce code

Citation:

DateTimePicker2->DateTime = Now();
DateTimePicker1->DateTime = Now();

Mais pour que l'horloge fonctionne, je crois qu'il faut mettre un Timer, j'en ai jamais utilisé...:oops: y'aurait il un code simple qui pourra faire une mise à "heure" de mon dateTimePicker?

Merci
26/04/2006, 13h28
pottiez

Il suffit de mettre le code que tu as montré dans l'évenement OnTimer du composant Timer, cela te mettra a jour tes TDateTimePicker régulierement, en fonction de la valeur que tu mettra dans la propriété Interval de ton composant Timer, cette propiété spécifie l'interval entre deux passage dans l'événement OnTimer, cette valeur est exprimé en milliseconde, donc si tu veut mettre à jour toute les secondes, tu y met la valeur 1000.
Voila, j'espère que ceci t'aidera.
A plus
26/04/2006, 14h02
wassila

Merci beaucoup, ça marche....Mais le problème se pose lorsque je change l'heure dans mon datetime picker, ça se remet automatiquement à l'heure du système.
y'aurait-il un moyen simple pour y remedier?

Merci d'avance
26/04/2006, 14h12
pottiez

Je t'ai déjà exposé ce problème, avec la solution à y apporter dans mon premier poste :

Citation:

Envoyé par pottiez

Le seul probleme est qu'ici si tu change la valeur de ton heure, qui est l'utilité de ton TDateTimePicker, elle va se remettre a jour la seconde qui suit, il faudrais donc initialisé ton TdateTimePicker au démarrage puis toute les secondes (grace à l'evenement du Timer), tu ajoute une seconde a la valeur prècedente de tonTDateTimePicker

Si tu ne comprend pas ma solution pose une question plus prècise sur ce que tu ne comprend pas.
A plus
26/04/2006, 20h29
wassila
Je viens de comprendre ce que vous vouliez dire:oops:

Donc je dois mettre un truc du genre:
Code:

1 2 3 4 void __fastcall TForm1::Timer1Timer(TObject *Sender) { TDateTimePicker1->Time = Time + 1 }
Biensur ce code ne fonctionne pas! Si quelqu'un pouvait me proposer une solution ça serait trés sympa.

Merci d'avance
26/04/2006, 20h41
pottiez
C'est presque ca, essaye plutot ceci, mais je ne suis pas sur que cela fonctionne :
Code:

1 2 3 4 void __fastcall TForm1::Timer1Timer(TObject *Sender) { TDateTimePicker1->Time = TDateTimePicker1->Time + 1 }
Si ca ne fonctionne pas, tu as des fonction, dans BCB, qui te permette d'incrémenté d'une seconde une variable heure, cherche dans l'aide de BCB cette fonction par exemple : IncSecond().
A plus
29/04/2006, 10h31
wassila

Malheusement ça ne marche pas...

Et concernant les fonction du BCB, et bien il y a que "incmonth" incsecond n'existe pas.
Je travaille avec la version 3...

Il existe peut être un autre moyen!!!???

Merci

Salut !

Peut-être quelque chose dans ce genre là (BCB3 Pro):

Déclarations globales

Code:

1
2
3
4
unsigned short hours;
unsigned short minutes;
unsigned short seconds;
unsigned short milliseconds;

Dans la OnTimer

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
DateTimePicker1->DateTime.DecodeTime(&hours, &minutes,
        &seconds, &milliseconds);
seconds++;
if(seconds > 60)
    {
    seconds = 0;
    minutes++;
    if(minutes > 60)
        {
        minutes = 0;
        hours++;
        if(hours > 24)
            {
            hours = 0;
            }
        }
    }
DateTimePicker1->DateTime = TDateTime(hours, minutes, 
        seconds, milliseconds);

Peut-être existe t-il une méthode plus simple ?

A plus !

Salut,
pour utiliser la fonction IncSecond, il faut inclure le fichier DateUtils.hpp, l'as tu bien inclue?
En tête :

Code:

#include <DateUtils.hpp>

Constructeur :
Code:

1 2 3 4 5 6 __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { DateTimePicker1->Time = Now() ; } //---------------------------------------------------------------------------
Evenement OnTime du composant Timer :
Code:

1 2 3 4 5 void __fastcall TForm1::Timer1Timer(TObject *Sender) { DateTimePicker1->Time = IncSecond(DateTimePicker1->Time,1) ; } //---------------------------------------------------------------------------
En procédent de cette manière cela marche nickel chez moi, mais c'est BCB 6, essaye quand même, ca a de grande chance de fonctionner.
A plus.

30/04/2006, 00h28
henderson

Salut !

Dans BCB3, le fichier DateUtils.hpp est introuvable !
C'est pour cette raison que j'ai donné cette bidouille !

A plus !
30/04/2006, 00h46
henderson
Salut !

Je viens de trouver la solution, à défaut d'une "IncSecond" :
Code:

1 2 3 double d = 1.0 / (24 * 60 * 60); DateTimePicker1->Time = DateTimePicker1->Time + d; DateTimePicker1->Repaint();
Time contient la partie fractionnaire du TDateTime, donc il faut raisonner
sur ce plan là :
1 heure = 1.0 / 24.0
1 minute = heure / 60.0
etc...

Il faut rajouter un Repaint sinon on ne voit rien !

A plus !
30/04/2006, 17h05
wassila
Citation:
Envoyé par henderson

Code:

1 2 3 double d = 1.0 / (24 * 60 * 60); DateTimePicker1->Time = DateTimePicker1->Time + d; DateTimePicker1->Repaint();

Time contient la partie fractionnaire du TDateTime, donc il faut raisonner
sur ce plan là :
1 heure = 1.0 / 24.0
1 minute = heure / 60.0
etc...

Il faut rajouter un Repaint sinon on ne voit rien !
Ce code marche trés trés bien, merci beaucoup henderson.

Merci à pottiez aussi pour les efforts fournis;)

Vous êtes géniaux et vive les developpeurs8-)