1. Accueil
  2. Tous les snippets
  3. Snippets Delphi / Pascal
  4. Recuperer le jour de la semaine format string (lundi,mardi, etc,...)

Recuperer le jour de la semaine format string (lundi,mardi, etc,...)

5/5 (7 avis)

Snippet vu 10 569 fois - Téléchargée 31 fois

Commenter

Contenu du snippet

Voici une ch'tite fonction pour récupérer le jour de la semaine :)

Source / Exemple : 


function Jour(LaDate:TDateTime):string;
begin

case DayofWeek(LaDate) of
 1: Result:= 'Lundi';
 2: Result:= 'Mardi';
 3: Result:= 'Mercredi';
 4: Result:= 'Jeudi';
 5: Result:= 'Vendredi';
 6: Result:= 'Samedi';
 7: Result:= 'Dimanche';
end;

end;

Conclusion :


Exemple d'utilisation:
Edit1.Text := Jour(Date);

A voir également

Ajouter un commentaire Commentaires
alekD
21 mars 2017 à 11:52
1 = Dimanche
7 = Samedi
ndsaerith
Messages postés
304
Date d'inscription
vendredi 16 janvier 2004
Statut
Membre
Dernière intervention
10 mai 2017
 2
8 mars 2007 à 13:10
Super !!!!
Merci beaucoup ^^
Ca m'a sauver la vie :D
Petite astuce : pour les semaines françaises décaler les jours d'un cran vers le bas ^^

Merci encore :D
davibz
Messages postés
4
Date d'inscription
mercredi 16 novembre 2005
Statut
Membre
Dernière intervention
21 octobre 2006
16 oct. 2006 à 22:36
c'bon, j'ai trouvé ma réponse, vive DateUtils.
davibz
Messages postés
4
Date d'inscription
mercredi 16 novembre 2005
Statut
Membre
Dernière intervention
21 octobre 2006
16 oct. 2006 à 21:52
Bonjour,

Je suis à la recherche d'une fonction qui recoit le numéro d'une semaine et renvoit le date du début et de la fin de la semaine. Auriez-vous une astuce?

Merci d'avance
cs_zmat
Messages postés
13
Date d'inscription
lundi 26 novembre 2001
Statut
Membre
Dernière intervention
29 octobre 2002
29 oct. 2002 à 22:48
Autre proposition :

Utilisation :

function Jour(LaDate:TDateTime):string;
begin
Result := FormatDateTime('dddd',StrToDate(LaDate));
end;

Consultez l'aide pour plus d'infos sur l'utilisation de la fonction FormatDateTime.

Bonne prog
Afficher les 7 commentaires
S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (fabiin)