FindFirst/FindNext auf Samba-Server findet nicht alle

[handson]

Hallo!

Ich habe ab und zu mal ein merkwürdiges Problem. Auf einem Samba-Server habe ich einen Ordner liegen, der teilweise 200-1000 Dateien beinhaltet. Diese werden von meinem Programm per FindFirst/FindNext gesucht und eingetragen. Zu 95% klappt das auch, aber hin und wieder findet er nur 2-3 Dateien, ohne Fehler. Startet man die Funktion erneut im gleichen Atemzug, findet er den Rest.
Heute z.B. lagen 737 Dateien dort. Erster Start der Funktion hat er 2 Dateien gefunden, direkt danach die restlichen 735.

Wie die Dateien aussehen, seht ihr im Anhang.

Hier mal mein Code-Schnipsel:

Delphi-Quellcode:

:
:

    Begin
      FileName := Konst.ImportPfadKonstanten.XMLImport + 'INV*.*';
      If FindFirst(FileName,faAnyFile,SR) = 0 Then
      Begin
        Repeat
          InvoiceDateien.Add(SR.Name);
        Until FindNext(SR) <> 0;
        FindClose(SR);
        Result := True;
      End Else
      Begin
        MessageDlg('Es konnten keine Import-Dateien im Pfad '+Konst.ImportPfadKonstanten.XMLImport+' gefunden werden!',
                   mtWarning,[mbOK],0);
        Result := False;
      End;
    End;

:
:

Hat jemand auch schon mal so ein Phänomän gehabt? Irgendwie skurril...

Stephan