Code-Library: Verzeichnisse nach Dateien durchsuchen

[Tomektor]

Ich bin neu hier, und grüße als erstes alle Forumteilnehmer!

Kurz zu meiner Person:
Als totaler DELPHI Neuling, hoffe ich hier eine kleine Starthilfe zu bekommen.
Delphi ist die erste Hochsprache die ich lernen will. Ich habe damit vor ein paar Tagen angefangen.
Bisher kann ich nur mit PHP dienen.

Da man am besten bei einem Projekt lernt, habe ich mir folgendes überlegt:

- Die MP3 Sammlung auf der Festplatte wird durchkämmt (Struktur:
Bandname/Album/Sontitel.mp3).
- Alle MP3-Tracks werden ausgelesen und in einer MySQL Datenbank (In drei Tabellen Bands, Alben, Songs) gespeichert.
- Dies soll entweder über ODBC oder dirket geschehen.
- Sinn der Anwendung soll sein:
- Songs werden aus der Datenbank in eine Listenbox gezogen
- Es wird automatisch eine Abspieldatei (*.mpl Datei) erzeugt (für Siemens Handys)
- Die Songs und die Abspieldatei werden auf die MultimediaCard
aufgespielt, wobei die alten MP3s auf der Karte gelöscht werden.
- Es entsteht somit eine MP3 Verwaltungsdatenbank mit einer Explorer funktion.

So jetzt zum Problem:
Ich habe mir das Skript Verzeichnisse nach Dateien durchsuchen aus der Code-Library angeschaut, verstanden und angewandt.

Die Methode akzeptiert drei Parameter.
Leider funktioniert sie bei mir nur bei der Verwendung von
Recurse als False (Damit wird nur das angegebene Hauptverzeichnis durchsucht).
Setze ich aber Recurse auf True (Damit werden auch alle Unterverzeichnisse durchsucht), dann bekomme ich folgende Fehler:

Access violation at address ... in module 'ntdll.dll'. Write id address ...' (Fehlermeldung füge ich als Attachment ein)

Wie gesagt ich bin totaler Anfänger und finde keinen plausiblen Grund, wieso diese Fehlermeldung kommt. Für mich sieht der Code aus der Code-Library OK aus.

Woran kann es liegen.
Danke im Vorraus für Antworten!
Bitte möglichst einfach formulieren

Grüße!

Tomektor