begin process at 2010 03 20 03:21:29
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Date & Heure

 > UN CHRONOS SIMPLE AVEC UN COMPOSENT LABEL ANIMÉ

UN CHRONOS SIMPLE AVEC UN COMPOSENT LABEL ANIMÉ


 Information sur la source

Note :
Aucune note
Catégorie :Date & Heure Classé sous :timer, crono, comptearebours, temp, heure Niveau :Débutant Date de création :10/06/2008 Date de mise à jour :13/06/2008 03:15:56 Vu / téléchargé :3 686 / 334

Auteur : jackalunion

Ecrire un message privé
Commentaire sur cette source (14)
Ajouter un commentaire et/ou une note

 Description

Cliquez pour voir la capture en taille normale
RESalut a tts, ceci est un crono trés simple.
avec un composant label animé
Installer le composant qui est dans le zip puis ouvrer



 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !
  •   Anim chronos
    •   Label animé
    • Unitcrono.ddpTélécharger ce fichier [Réservé aux membres club]51 octets
    • Unitcrono.dfmTélécharger ce fichier [Réservé aux membres club]1 253 octets
    • Unitcrono.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier2 159 octets

Télécharger le zip


 Historique

13 juin 2008 03:16:02 :
J ai modifié ma sources par ce qu elle est trés simple,

 Sources de la même categorie

Source avec Zip Source avec une capture TIMESERVER V1.0.3 par Christophe67
Source avec Zip Source avec une capture DATE_HEURE par Christophe67
Source avec Zip Source avec une capture DECOMPTEUR AVEC ENREGISTREMENT DES OPTIONS par michaelminelli1
Source avec Zip Source avec une capture MODIFIER LES DATES DE CRÉATION, DE MODIFICATION ET DE DERNIE... par ni69
DATE EN ARABE par AITFRAH1

 Sources en rapport avec celle ci

Source avec Zip Source avec une capture TIMESERVER V1.0.3 par Christophe67
Source avec Zip TMICROTIMER - TIMER À LA MICROSECONDE ! par Bacterius
Source avec Zip Source avec une capture SIMULATION DE PLUSIEURS TIRAGES DU JEU DE JOKER (LOTTO) par bad_dark_spirit
BLOQUER LE TASKMGR SANS CLÉ DE REGISTRE par craftsystem
Source avec Zip Source avec une capture CHRONOMETRE / COMPTE A REBOURS *10 par LeDOC666

Commentaires et avis

Commentaire de Nicolas___ le 10/06/2008 14:30:30

" Salut a tts, ceci est un crono trés simple.

C'est ma premiére sources et ce n'est pas la derniére."

...

Ca promet monts et merveilles  :)

Commentaire de Caribensila le 10/06/2008 14:48:30

Pourra remplacer avantageusement un sablier ou un cadran solaire!
Mais enfin, c'est pas de l'horlogerie suisse au niveau de la précision.

De nos jours, les PC disposent d'une horloge interne de haute performance mesurant mieux que la µs (voir l'Api QueryPerformanceCounter).


PS : Cronos  : Roi des Titans.
     Chronos : Dieu primordial personnifiant le temps (d'où "chronomètre").

Commentaire de jackalunion le 10/06/2008 15:08:05

il n'est jamais trop tard pour apprendre

Commentaire de jackalunion le 10/06/2008 15:49:17

c'est vrai que je métrise pas encore bien votre langue, mais j'apprend vite.
comme en dit: "Connaitre les autres c'est une force,mais connaitre soi même c'est une force superieur."

Commentaire de Caribensila le 10/06/2008 16:46:24

En tout cas, jackalunion accepte les critiques sans pleurnicher et sans quérulence, lui.
C'est un très bon point. Il progressera vite, j'en suis sûr.

Bienvenue et bon courage !

Commentaire de jackalunion le 10/06/2008 17:43:25

Merci a toi. Et j'espére apprendre.

Commentaire de HAFTARIFOUAD le 10/06/2008 20:52:44

Bonjour

Tout d'abord, les bienvenues dans le monde de la programmation, j'espère que vous tiendrez de vos paroles « C'est ma première sources et ce n'est pas la dernière ».
J'aimerai bien vous donner des conseils pour que vous puisse améliorer votre travail :
1.Renommez vos fiches, composants, .
2.L'utilisation des threads (processus externes) c'est très utile pour votre cas. Comme ça vous assurer que votre application se ne bloquera pas.
3.Utilisez la commande DecodeTime pour calculer l différence entre le temps de démarrage et le temps actuel (vous pouvez ressortir la différence entre les heures, minutes, ainsi les secondes.)
4.Utilisez la commande FormatFloat(00 :00 :00 , Integer). C'est mieux que d'utiliser : Label1.Caption := Hh+' :'+Mm' :+' :'Ss
5.Très important un message de confirmation, pour confirmer le remise à zéro de votre compteur.
6.C'est utile pour votre cas d'utiliser l'heure de système -Si vous modifier par exemple Timer1.Interval :=500- !!!

En tout cas, je sais que, ce n'est qu'un début, je vous souhaite bonne chance et un grand progrès dans le domaine de la programmation.

Commentaire de jackalunion le 10/06/2008 22:46:09

  merci HAFTARIFOUAD pour tes conseil
j'ai appris a tenir compte de touts conseils venant de personnes expérimanté.

Commentaire de f0xi le 11/06/2008 18:18:52 administrateur CS

var GTC : LongWord;

procedure TForm1.Button1Click(Sender: TObject);
const
  BTNCAP : array[boolean] of string = ('GO','STOP');
begin
  Timer1.Enabled := not Timer1.Enabled;
  (Sender as TButton).Caption := BTNCAP[Timer1.Enabled];
  if Timer1.Enabled then
    GTC := GetTickCount;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
var G, H, M, S : integer;
begin
  G := GetTickCount - GTC;
  S := G div 1000 mod 60;
  M := G div 60000 mod 60;
  H := G div 3600000;

  Label1.Caption := format('%.2d:%.2d:%.2d',[H,M,S]);
end;

Commentaire de jackalunion le 12/06/2008 00:39:11

F0XI chapeau, aux moin vous vous donnez une chance aux débutant.  j'accepte touts critiques car je ne sais pas pour d'autres mais moi ça me donne du courage pour mieux faire

Commentaire de f0xi le 12/06/2008 11:34:05 administrateur CS

Salut jackal, :)
pas de soucis, par contre evite de poster des sources trop "simple", a entendre par la, de debutant.
C'est pas que nous exigeont des codes de pro forcement, mais, tout les debutants suivant a peu prés le meme chemin, nous nous retrouvons avec des dizaines de sources identiques et sans grand interet finalement.

Essaye d'etre original et creatif et surtout n'hesite pas a regarder les sources des habitués, pour voir a quel niveau ils mettent la qualité de la source (indentation, commentaire etc).

bon courage.

Commentaire de jackalunion le 12/06/2008 13:40:03

Ok. j'ai compris, et encore merci.

Commentaire de JulioDelphi le 13/06/2008 07:42:49 administrateur CS

Salut, tu as 2 procédures totalement identiques (formmove, timeanimove), efface en une (proprement) et dans l'inspecteur dobjet, attribue l'evènement du formove sur ton timeanimove =)

Commentaire de jackalunion le 14/06/2008 01:20:45

A oui c'est juste Merci Juliodelphi

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

Un timer relatif à des heures [ par Francky23012301 ] Salut je voudrais savoir comment si on peut faire un timer non pas en ms ou secondes mais en heure. Est il possible aussi une fonction telle que un pr [2005 PE] Timer en arrière plan [ par nitrique ] Bonjour, J'ai une application qui a un timer qui scanne le port COM (qui ne touche pas au graphisme de mon application) toutes les 3 secondes.C cool, affichage de l'heure [ par kam81 ] bonjour,je veut utiliser un label pour decorer mon application et afficher l'heure et la date sur la forme principale. Listbox erreur [ par Valeriu ] J'ai mit une timer sur un form.A chaque 300 ms il prenne le contenu d'un fichier text et il le met dans une listbox.La pb c'est qu'il le met aussi sur Tfilestream : problème de lecture du fichier [ par bv94 ] Bonsoir,mon problème est le suivant : je créé un type Toperation qui hérite de Tfilestream. Mais les fonctions de tfilestream que Un timer pour gerer un enregistrement [ par Francky23012301 ] Salut à tous,Voila j'ai une Form avec 3 boutons et 2 Edit*Bouton 1 : ParcourirEdit 1 : Fichier choisisEn cliquant sur Parcourir je sélection Précision temporelle d'une éxécution [ par f6dqm1 ] Bonjour à tousDans une application Delphi, je cherche à exécuter une action répétitive sur un port série avec une pr&#23 Bloqué par Indy::TIdHttp [ par Filipe35 ] bonjour à tous j'execute un code dans mon timer avec HTTP de indy, celui ci est bloquant et bloque toute mon application ! comment faire en sorte qu wait, timer, sleep d'environ 10 nano-secondes [ par groben ] Pour une application qui fait de l'acquisition de données, j'ai besoin d'attendre pendant une période de 12 ns exactement pendant une boucle Remplacement de caractères pour chaques lettres [ par tony1239456 ] Bonjour, je voudrais savoir si il existe une fonction permettant de remplacer des caractères dans une chaine différents pour chaques lettres


Nos sponsors


Sondage...

CalendriCode

Mars 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
293031    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 1,092 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales