Discussion :

[Fabien50]

Bonjour,

je suis en train de créer une application sous Borland C++ Builder. Je suis débutant sur ce logiciel.

Comment dois je faire pour afficher une heure + date sur la ma fenêtre Form1 ?
J'imagine que je dois intégrer une commande dans un label ?

Merci d'avance pour votre aide.

[Invité]

Le type de données qui fournit les heures et dates, en vcl, c'est TDateTime. Pour afficher l'heure et la date, tu peux faire

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
TDateTime d;
Label1->Caption=d.DateTimeString();

pour juste la date,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
TDateTime d;
Label1->Caption=d.DateString();

Pour avoir la date et l'heure courante, tu fais

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

TDateTime d=::Date();

Francois

[Fabien50]

Le type de données qui fournit les heures et dates, en vcl, c'est TDateTime. Pour afficher l'heure et la date, tu peux faire

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
TDateTime d;
Label1->Caption=d.DateTimeString();

pour juste la date,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
TDateTime d;
Label1->Caption=d.DateString();

Francois

Merci pour ta réponse

J'ai testé la première commande pour la date, et il m'affiche effectivement bien ce que je veux, à quelques détails prêts : "30/12/1899" voici la date donnée comment ça se fait ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

TDateTime d=::Date();

Comment j'intègre cette ligne ? car je ne la comprend pas du tout.

Sinon, j'aurai voulu savoir, cette date/horloge, il nous faut la rafraichir pour qu'elle tourne toute seule. Comment on fait ? Avec un timer je suppose, mais comment l'exploite t'on ?

Merci pour votre aide

[pottiez]

Salut,
ce code devrait fonctionner :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
TDateTime d(Now());
Label1->Caption=d.DateTimeString();

Ou directement :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Label1->Caption=Now();

[Fabien50]

Salut,
ce code devrait fonctionner :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
TDateTime d(Now());
Label1->Caption=d.DateTimeString();

Ou directement :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Label1->Caption=Now();

Ah la commande Now() marche bien

Maintenant pour rafraichir ceci, je dois mettre quoi ?!

Merci beaucoup

[pottiez]

Et bien tout dépend de comment tu veut l'afficher, par exemple dans le code donner on le met dans un TLabel, ça peut suffire, cela dépend vraiment de la présentation que tu veut faire.

[Fabien50]

Et bien tout dépend de comment tu veut l'afficher, par exemple dans le code donner on le met dans un TLabel, ça peut suffire, cela dépend vraiment de la présentation que tu veut faire.

Je l'ai mis dans Label effectivement. Donc là l'horloge est bonne sauf qu'elle ne tourne pas automatiquement. Et je pensais mettre un rafraichissement toute les 500 ms.

Je dois faire comment ?

Merci

[pottiez]

As, ca c'est différent!
Il faut utiliser un TTimer, et dans l'évènement OnTimer tu met le code donné plus haut, ensuite il ne suffit plus qu'as configurer la propriété Interval du Timer pour que ca rafraichisse à la fréquence que tu souhaite

[Fabien50]

As, ca c'est différent!
Il faut utiliser un TTimer, et dans l'évènement OnTimer tu met le code donné plus haut, ensuite il ne suffit plus qu'as configurer la propriété Interval du Timer pour que ca rafraichisse à la fréquence que tu souhaite

On ne m'a donné donné aucun code pour l'event OnTimer

Sinon, j'ai bien mis mon interval à 500 ms comme je le voulais. J'ai mis un évènement OnTimer, mais je ne sais pas quoi mettre dedans.

Merci

[pottiez]

Salut,
le code donnée plus haut, on n'as pas précisé ou tu devait le mettre, en l'occurrence, tu peut le mettre ou tu veut et notamment dans l'évènement OnTimer

[dz_robotix]

On ne m'a donné donné aucun code pour l'event OnTimer

Sinon, j'ai bien mis mon interval à 500 ms comme je le voulais. J'ai mis un évènement OnTimer, mais je ne sais pas quoi mettre dedans.

Merci

colles ceci:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Label1->Caption=Now();

[Fabien50]

Salut,
le code donnée plus haut, on n'as pas précisé ou tu devait le mettre, en l'occurrence, tu peut le mettre ou tu veut et notamment dans l'évènement OnTimer

Ah oui impeccable, j'ai mis le code dans la Form en fait à la base. Je l'ai déplacé dans l'évènement du Timer.

Merci pour votre aide