Comment automatiser mon programme qui affiche l'heure

Marsh Posté le 12-04-2005 à 00:03:37

bonjour a tous,
j'ai fait ce programme qui permet en entrant une certaine heure de continuer a calculer l'heure d'après en fonction de cette heure
par exemple si je met 12h56m23sec il va m'afficher ensuite 12h56m24sec et ainsi de suite
seulement je suis obligé d'appuyer sur le bouton pour qu'il incremente de 1
comment puis-je faire pour qu'il le fasse automatiquement ?

Code :

void __fastcall TForm1::BitBtn1Click(TObject *Sender)
{
int h,m,s;
h=StrToInt (Eh->Text);
m=StrToInt (Em->Text);
s=StrToInt (Es->Text);
s++;
if (s==60) {
s=00;
m++;
}
if (m==60) {
m=00;
h++;
}
if (h==24) {
s=00;
h=00;
}
Eh->Text=IntToStr(h);
Em->Text=IntToStr(m);
Es->Text=IntToStr(s);
}

Reply

Marsh Posté le 12-04-2005 à 00:03:37

Reply

Marsh Posté le 12-04-2005 à 00:41:08

avec un TTimer.
tu mets sa propriété Interval à 1000 ms (une seconde) et tu mets ton code dans le handler rattaché à l'event OnTimer

---------------
J'ai un string dans l'array (Paris Hilton)

Reply

Marsh Posté le 12-04-2005 à 00:59:07

merci Harkonnen, mais ca plante je vois pas pourquoi.

j'ai donc ajouté un TTimer sur ma feuille, interval 1000

evenement ontimer: BitBtn1Click

ca me semble bon [:airforceone]

Reply

Marsh Posté le 12-04-2005 à 18:55:28

up, j'ai toujours pas résolu mon probleme

Reply

Marsh Posté le 12-04-2005 à 19:18:22

poste le code avec la fonction callback rattachée au OnTimer

---------------
J'ai un string dans l'array (Paris Hilton)

Reply

Marsh Posté le 12-04-2005 à 19:58:56

c'est quoi la fonction callback ? :??:

Reply

Marsh Posté le 12-04-2005 à 20:16:17

la fonction qui réagit à OnTimer

---------------
J'ai un string dans l'array (Paris Hilton)

Reply

Marsh Posté le 12-04-2005 à 21:00:28

Harkonnen a écrit :

la fonction qui réagit à OnTimer

le code est toujours le même

Code :

void __fastcall TForm1::BitBtn1Click(TObject *Sender)
{
int h,m,s;
h=StrToInt (Eh->Text);
m=StrToInt (Em->Text);
s=StrToInt (Es->Text);
s++;
if (s==60) {
s=00;
m++;
}
if (m==60) {
m=00;
h++;
}
if (h==24) {
s=00;
h=00;
}
Eh->Text=IntToStr(h);
Em->Text=IntToStr(m);
Es->Text=IntToStr(s);
}

désolé j'ai pas encore appris les timers donc je sais pas trop comment ca marche
si quelqu'un a un tuto ce serai bien.
merci harkonen

Reply

Marsh Posté le 13-04-2005 à 00:34:11

j'ai quand même fini par trouver tout seul

en fait j'ai mis mon code derriere le compteur et derriere mon bouton j'ai mis Timer1->Enabled=true;

et voila tout marche comme ca [:alphat]
merci pour ton aide Harkonnen