Discussion :

[sfeltan]

Voila je dois créer un fichier, une fois par jour, avec la date comme nom de fichier...

Voila ma fonction:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
    TDateTimeKind Kind=dtkDate;  
     TDTDateFormat DateFormat=dfLong;  //Changement du type d'affichage de la date
 
     AnsiString DateNomFichier;
     DateNomFichier=TDateTime::CurrentDate();  //Récupération de la date, jusque là tout marche
     AnsiString Test="C:\\";
     AnsiString FichierNom=Test+DateNomFichier; /
     char Fichier[40];
 
     strcpy(Fichier, FichierNom.c_str());   //Stocke le nom du fichier dans un char, pour la fonction ofstream
 
     ofstream outfile (Fichier, ios::app);  //Création du fichier

Bon apparament tout marche sauf la récupération de date. D'après la doc, si les variables Kind et DateFormat doivent étre respéctivement afféctées des valeurs dtkDate et dfLong afin que la date soit sous format "vendredi 22 mai 2007" au lieu de 22/05/07. Car les " / " ne sont pas autorisés pour un nom de fichier.
Le hic, c'est qu'en plaçant des break points, je me suis aperçu que le programme ne stocke pas la date sous la forme "vendredi ..." mai sous la forme abrégée "22/05/07"...
Quesce qui ne va pas?

[sfeltan]

Bon j'ai résolu le probleme en stockant la date dans un char[10] et une boucle for(int i=0; i<10; i++) me changeant les "/" par des "_"...

Mais si qq1 a une solution à ma première question... Je suis prenant!

[gér@rd lambert]

!

Tu peux faire un truc du genre (code pas testé) :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
AnsiString asJour, asMois, asAnnee;
unsigned short jour, mois, annee;
TDateTime date = CurrentTime();
date.DecodeDate(&annee, & mois, &jour);
asAnnee = annee.IntToStr();
asJour = jour.IntToStr();
switch(mois)
{
case 1 : asMois = "Janvier";
.
.
.
case 12 : asMois = "decembre";
}
 
AnsiString Test="C:\\";
AnsiString FichierNom=Test+asJour+" " +asMois+ " "+asAnnee;

Apres pour trouver le jour de la semaine tu as la méthode de TDateTime 'DayOfWeek()', a l'aide d'un switch/case comme pour le mois ca doit le faire.

Bon bah c'est sûr c'est un peu plus long mais devrait fonctionner.

voilou

[sfeltan]

ok, merci pour la réponse, c'est pas mal comme principe. Mais bon vu que mon code marche avec la méthode que j'utilise, je vais garder ça. En tout cas, merci c'est toujours utile de voir d'autres méthodes!!!