BlueGEEK Journal

Accueil > Manip’s > Delphi > Atelier Delphi pour les Nuls > Delphi Blue Baby Faq > 21- Comment écrire une Date sous ses différentes formes ?

21- Comment écrire une Date sous ses différentes formes ?

Instruction : FormatDateTime

lundi 21 avril 2008, par bluegyn_spip

- Le programme vous sert une date standard "28/04/2008". Comment faire apparaitre le jour de la semaine et écrire le mois en lettres ?

- Soit maDate une date extraite d’un calendrier

var maDate : TDate ;

maDate := form1.MonthCalendar1.Date ;

Pour afficher le Format 28/04/2008

caption := FormatDateTime ( ’dd/mm/yyyy’, maDate ) ;

Pour afficher

Rendez vous le 28 avril 2008 à 17heures

caption := FormatDateTime ( ’ "Rendez-vous le" dd mmmm yyyy "à 17 heures" ’, maDate ) ;

Prendre soin de bien protéger toute la partie littérale [1] en la mettant "Entre Guillemets"


HORLOGE PRIMITIVE

- Déposez sur la fiche un Composer TIMER


- Double cliquez sur le Composant Timer pour ouvrir son Gestionnaire d’évènement

- Et recopiez y ce code


caption := FormatDateTime(

’"Aujourd’’hui nous sommes le" dddd dd mmmm yyyy " ’+

’et il est exactement" h "heures" n "minutes" "et" s "secondes"’,

now) ;


NOW définit la date du jour


Propriétés du Composant Timer (F11)

Enabled True Active la minuterie
Enabled False Arrête la minuterie
Interval 1000 Génère un Ticks d’horloge toutes les 1000 millisecondes (1 seconde)

- Voir aussi dans l’aide de Delphi

  • Index
    • formatage des valeurs date-heure

[1c’est a dire celle qui ne doit pas être formatée