Récuperer la date de formattage du disqueRésolu

Question

Bonjour,

Existe t'il un moyen de r&#233;cuperer la date de formattage du disque, ou de la cr&#233;ation de la partition, ou de l'installation de windows (j'ai Windows XP) ?

Merci pour votre aide

Emandhal · Accepted Answer

De tête, ça doit donner quelquechose comme ça :

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 //$0000003F= faAnyFile
    Result := FileTime2DateTime(SR.FindData.ftCreationTime);
  SysUtils.FindClose(SR);
End;

Pour s'en servir c'est :
FormatDateTime('dd/mm/yyyy hh:nn:ss', DateCreationRep('C:\Windows'))
par exemple...

Emandhal · Answer

Il n'y a pas d'information de date d'enregistré dans la MBR ou dans la partition elle même sur sa date de création, donc de ce coté là, tu ne peux pas.

Coté windows, je ne sais pas. Peut-être en regardant du coté de la date de création des fichiers dans le répertoire Windows.

cs_bib34690 · Answer

Merci Emandhal.
Bon, c'est pas ce que j'esp&#233;rais mais je vais faire avec (ou sans...)

Je voudrais prendre la date du dossier "windows" mais quand j'&#233;cris
FileAge('c:\windows') il me retourne une date bidon en 1999 alors que l'explorateur affiche 2005.
Je parcours internet depuis des heures et pas de r&#233;ponse. Il semble que FileAge ne marche pas sur les dossiers, mais je n'ai pas trouv&#233; d'autre fonction.....
...si qq peut encore m'aider...merci

cs_bib34690 · Answer

Merci beaucoup Emandhal, pour ton aide.

On peut aussi &#233;crire :
Result:=FileTime2DateTime(SR.Time);

Merci et &#224; une prochaine...
que la force soit avec toi.

Emandhal · Answer

Je ne pense pas, SR.Time doit renvoyer la date de modification du répertoire, il me semble...

cs_bib34690 · Answer

A priori, il n'y a pas de date de modification pour les repertoires...en tout cas on ne peut pas la voir avec l'explorateur...

Emandhal · Answer

Si si, regardes mieux, si tu affiches la colonne de modification, de création et d'accès, tu verras qu'il y a des dates. (Dans le ListView de droite, sans faire propriété quoi)

cs_bib34690 · Answer

....????!!! glop glop...tu as enti&#232;rement raison...
encore merci ...

Récuperer la date de formattage du disque

8 réponses

Votre réponse

Discussions similaires