Langage de programmation - Turbo Pascal - Référence de procédures et de fonctions

GETDATE	Demande la date
Turbo Pascal 4+	DOS, WinDos

Syntaxe

Procedure GetDate(Var annee,mois,jour, jour_semaine:Word);

Paramètres

Nom	Description
annee	Ce paramètre permet de retourner l'année actuel
mois	Ce paramètre permet de retourner le mois actuel
	Valeur	Description
	1	Cette valeur permet d'indiquer le mois de Janvier
	2	Cette valeur permet d'indiquer le mois de Février
	3	Cette valeur permet d'indiquer le mois de Mars
	4	Cette valeur permet d'indiquer le mois d'Avril
	5	Cette valeur permet d'indiquer le mois de Mai
	6	Cette valeur permet d'indiquer le mois de Juin
	7	Cette valeur permet d'indiquer le mois de Juillet
	8	Cette valeur permet d'indiquer le mois d'Août
	9	Cette valeur permet d'indiquer le mois de Septembre
	10	Cette valeur permet d'indiquer le mois d'Octobre
	11	Cette valeur permet d'indiquer le mois de Novembre
	12	Cette valeur permet d'indiquer le mois de Décembre
jour	Ce paramètre permet de retourner le jour actuel (valeur entre 1 et 31)
jour_semaine	Ce paramètre permet de retourner le jour de la semaine actuel:
	Valeur	Description
	0	Cette valeur permet d'indiquer le Dimanche
	1	Cette valeur permet d'indiquer le Lundi
	2	Cette valeur permet d'indiquer le Mardi
	3	Cette valeur permet d'indiquer le Mercredi
	4	Cette valeur permet d'indiquer le Jeudi
	5	Cette valeur permet d'indiquer le Vendredi
	6	Cette valeur permet d'indiquer le Samedi

Description

Cette procédure permet de connaître la date actuel du système d'exploitation.

Remarque

L'intervalle de valeurs renvoyées sont pour annee de 1980 à 2099, pour mois de 1 à 12, pour jour de 1 à 31 et pour jour_semaine de 0 à 6 (où 0 correspond au dimanche).

Exemple

Le programme suivant permet d'afficher la date courante du système :



Program GetDateSamples;

 
Uses DOS;

 
Var

 annee,mois,jour,jour_de_semaine:Word;

 
BEGIN

 GetDate(annee,mois,jour,jour_de_semaine);

 WriteLn('La date d''aujourd''hui est ',annee,'-',mois,'-',jour);

END.

Si vous êtes le 25 janvier 2015, vous obtiendrez le résultat suivant :

2015-1-25

Référence

Aide-mémoire de Turbo Pascal versions de 3 à 6, Edition Marabout, De Groote, Virga, 1992, ISBN: 2-501-01833-8, page 200.
Le grand livre du Turbo & Borland Pascal 7.0, Edition Micro Application, Reiner Scholles, 1993, ISBN: 2-86899-873-9, page 1238.

Dernière mise à jour : Dimanche, le 25 janvier 2015

Section courante

A propos

Section administrative du site

GETDATE