Date création fichier [Résolu]

cs_dugueclin 66 Messages postés jeudi 2 septembre 2004Date d'inscription 10 juillet 2012 Dernière intervention - 25 janv. 2006 à 17:16 - Dernière réponse : cs_dugueclin 66 Messages postés jeudi 2 septembre 2004Date d'inscription 10 juillet 2012 Dernière intervention
- 28 janv. 2006 à 14:08
Bonjour à tous,
J'aimerai connaître la date de CREATION d'un fichier.
Tous ce que j'ai trouvé , ce sont des fonctions qui rappellaient la date de dernière modification d'un fichier ou autre :
(fileAge, DateToFileDateTime, GetFileAttr), ces fonctions m'ont étées très intéressantes pour lire les différents attributs d'un fichier, mais ce que j'essaye de lire et d'apprendre maintenant,
c'est la date de création d'un fichier et je n'y arrive pas.
Quelqu'un pourrait-il me dire comment faire?.
En vous remercient par avance,
Sincères salutations et bons codding à tous .
Dugueclin.
Afficher la suite 

Votre réponse

3 réponses

Meilleure réponse
Emandhal 199 Messages postés dimanche 2 mars 2003Date d'inscription 10 octobre 2006 Dernière intervention - 26 janv. 2006 à 17:29
3
Merci
Function DateCreationRep(aPath: String): TDateTime;
Var
SR: TSearchRec;
Function FileTime2DateTime(FileTime: TFileTime): TDateTime;
Var
LocalFileTime: TFileTime;
SystemTime: TSystemTime;
Begin
FileTimeToLocalFileTime(FileTime, LocalFileTime);
FileTimeToSystemTime(LocalFileTime, SystemTime);
Result := SystemTimeToDateTime(SystemTime);
End;

Begin
If FindFirst(aPath, $0000003F, SR)=0 Then
Result := FileTime2DateTime(SR.FindData.ftCreationTime);
SysUtils.FindClose(SR);
End;

Merci Emandhal 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 92 internautes ce mois-ci

Commenter la réponse de Emandhal
Meilleure réponse
Cirec 4231 Messages postés vendredi 23 juillet 2004Date d'inscription 3 août 2018 Dernière intervention - 26 janv. 2006 à 17:45
3
Merci
Salut,
utilise plutôt faAnyFile$0000003F c'est bien plus explicite



@+
Cirec

Merci Cirec 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 92 internautes ce mois-ci

Commenter la réponse de Cirec
cs_dugueclin 66 Messages postés jeudi 2 septembre 2004Date d'inscription 10 juillet 2012 Dernière intervention - 28 janv. 2006 à 14:08
0
Merci
merci à vous deux c'est super sympat
Sincères salutations et bon codding.
Dugueclin.
Commenter la réponse de cs_dugueclin

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.