J'essaie de trouver le fichier le plus ancien dans un dossier (sous NTFS). Pour faire des tests je crée 100 fichiers comme cela:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
 
for index_file := 1 to 100 do
  begin
    filename := buildFileName(index_file);
 
    AssignFile(f, Fpath + filename);
    rewrite(f);
    Writeln(f, 'bla bla bla');
    CloseFile(f);
    //Sleep(1) ;
  end;
puis je parcours ces fichiers avec FindFirst/FindNext(search_rec) et je compare les dates de création search_rec.FindData.ftCreationTime avec la fonction CompareFileTime.

J'ai la surprise de constater que plusieurs de ces dates sont identiques. De même quand j'insère un Sleep de quelques millisecondes. A partir de 10 millisecondes, les dates de création sont toutes différentes.

Quelqu'un aurait-il une explication ?
Bruno