Recuperer un Mois a partir d'une Date. [Résolu]
cs_abdousoft
109
Messages postés
mardi 3 août 2004Date d'inscription
5 novembre 2007
Dernière intervention
-
16 oct. 2007 à 09:39 - Dernière réponse :
cs_pers
40
Messages postés
vendredi 2 mai 2003Date d'inscription
9 décembre 2009
Dernière intervention
- 17 oct. 2007 à 08:28
- Recuperer un Mois a partir d'une Date.
- Dates d'un mois a partir d'une date » Forum - Java
- Comment récuperer le mois dans une date?? (Résolu) » Forum - Visual Basic
- Récupérer le samedi/le jeudi d'une semaine à partir d'une date (Résolu) » Forum - VB.NET
- Récupérer le mois dans une date » Forum - Java
- Recuperer le numero de la semaine à partir d'une date » Forum - PHP
8 réponses
Répondre au sujet
@ pers, bonne idée, on sait aussi décoder l'année et le jour ?
ou encore :
procedure TFtestdate.FormCreate(Sender: TObject);
var
s,s2,s3,s4,s5: string;
begin
s := datetostr(date);
s2:= FormatDateTime('dddd',now);
s3:= FormatDateTime('dd',now);
s4:= FormatDateTime('mmmm',now);
s5:= FormatDateTime('yyyy',now);
Pl1.Caption:= s;
Pl2.Caption:= s2 +' ' + s3+' '+s4 + ' '+ s5;
end;
[mailto: mailto:]
ou encore :
procedure TFtestdate.FormCreate(Sender: TObject);
var
s,s2,s3,s4,s5: string;
begin
s := datetostr(date);
s2:= FormatDateTime('dddd',now);
s3:= FormatDateTime('dd',now);
s4:= FormatDateTime('mmmm',now);
s5:= FormatDateTime('yyyy',now);
Pl1.Caption:= s;
Pl2.Caption:= s2 +' ' + s3+' '+s4 + ' '+ s5;
end;
[mailto: mailto:]
Cette réponse vous a-t-elle aidé ?
salut,
t'as deux approches pour extraire le num du mois:
copy+strtoint OU strtodate(avec format setting)+monthof
pour avoir le nomk du mois:
utiliseun tableau de string avec le nom des mois.
si ton format est fix, je te recommande copy.
bon code,
Loda
Se poser les bonnes questions est le premier pas pour trouver les bonnes réponses.
t'as deux approches pour extraire le num du mois:
copy+strtoint OU strtodate(avec format setting)+monthof
pour avoir le nomk du mois:
utiliseun tableau de string avec le nom des mois.
si ton format est fix, je te recommande copy.
bon code,
Loda
Se poser les bonnes questions est le premier pas pour trouver les bonnes réponses.
Bonjour à toutes et à tous,
@ abdousoft, voici un exemple que tu modifies à ta guise.
procedure TFtestdate.FormCreate(Sender: TObject);
var
s: string;
s2: string;
begin
s := datetostr(date);
s2:= FormatDateTime('mmmm',now);
Pdate1.Caption:= s;
Pdate2.Caption:= 'C''est un '+ s2;
end;
N. B : dddd jour, mmmm mois, yyyy = année
@+,
Cincap
[mailto: mailto:]
@ abdousoft, voici un exemple que tu modifies à ta guise.
procedure TFtestdate.FormCreate(Sender: TObject);
var
s: string;
s2: string;
begin
s := datetostr(date);
s2:= FormatDateTime('mmmm',now);
Pdate1.Caption:= s;
Pdate2.Caption:= 'C''est un '+ s2;
end;
N. B : dddd jour, mmmm mois, yyyy = année
@+,
Cincap
[mailto: mailto:]
Salut,
Voir aussi le tut' de Japee pour réviser tout ça:
http://www.delphifr.com/codes/FORMATDATETIME-AFFICHAGE-DATE-HEURE-DANS-CHAINE_25377.aspx
Voir aussi le tut' de Japee pour réviser tout ça:
http://www.delphifr.com/codes/FORMATDATETIME-AFFICHAGE-DATE-HEURE-DANS-CHAINE_25377.aspx
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.