Compteur mécanique à tambours rotatifs

Signaler
Messages postés
2
Date d'inscription
vendredi 29 novembre 2013
Statut
Membre
Dernière intervention
29 novembre 2013
-
Messages postés
268
Date d'inscription
mardi 24 juillet 2007
Statut
Membre
Dernière intervention
2 février 2021
-
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/100263-compteur-mecanique-a-tambours-rotatifs

Messages postés
268
Date d'inscription
mardi 24 juillet 2007
Statut
Membre
Dernière intervention
2 février 2021

Bonjour,

Pour afficher l'heure il suffit :
1) Dans la procedure AfficherNombre(var Image: Timage; Nombre: string), d'y remplacer la const CF par const CF: set of Char = ['+', '-', '.', ',', 'E', 'i',':']; où j'ai ajouté le ':' ça permet d'afficher en plus l'heure.
2) Et de modifier la procedure TForm1.Timer1Timer(Sender: TObject); comme suit :
begin
if Animer then begin
Number := Number + DeltaNombre;
//edNombre.Text := FloatToStr(Number); edNombre.Update;
edNombre.Text:=TimeToStr(Time); edNombre.Update;
AfficherNombre(imgCompteur, edNombre.Text);
end;
end;

Bonne continuation, et à +
Messages postés
19
Date d'inscription
vendredi 21 août 2009
Statut
Membre
Dernière intervention
22 février 2018

Bonjour ,
merci pour ce code, je cherche comment faire pour l'afficher comme l'indicateur de temps (le montre ).
Bonjour Korgis,

Merci pour cette explication,
Et comment puis-je faire pour supprimer le nouveau pseudo (pseudo8) pour ré-utiliser pseudo3 devenu cs_pseudo3 ???

A+
Messages postés
420
Date d'inscription
samedi 17 mai 2003
Statut
Membre
Dernière intervention
6 mai 2019
16
Oui, c'est un peu le bazar depuis... un certain temps.
L'explication est que ton pseudo est devenu cs_pseudo3 suite à la fusion (l'absorption ?) de CodeS-SourceS par CCM.
Voici le lien pour accéder à ton profil :
http://codes-sources.commentcamarche.net/profile/user/cs_pseudo3
Amitiés à tous.
Messages postés
2
Date d'inscription
vendredi 29 novembre 2013
Statut
Membre
Dernière intervention
29 novembre 2013

C'est bizarre : Pour déposer ce code il a fallu que je m'inscrive en tant que nouveau membre ce qui m'a obligé de prendre un nouveau pseudo alors que j'aurais bien aimé conserver mon ancien pseudo qui était pseudo3.