löschen von ordnern und auch unterordnern

[Susanne]

Hallo,

Delphi-Quellcode:

Verzeichnisstruktur z.B.
 C:\
     - test4
          -Untertest1
                 - Untertest2
     - test5

Ich habe den Suchpfad C:\test4. Darunter können sich weitere Unterordner befinden, die weitere enthalten können. Ich möchte nun folgendes. Er soll alle unterdurchgehen, dann soll er gucken, ob der Ordner leer ist, wenn ja löschen.

Wie mache ich das. Denn er müsste ja erst beim Ordner Untertest2 anfangen und gucken, ob der leer ist, wenn ja löschen, und dann er gucken, ob Untertest1 leer ist und diesen dann auch löschen wenn er leer ist. Andersrum bliebe der ja dann stehen, weil da bei der Prüfung, der ORdner Untertest2 noch exitierte.

Wie kann ich dies nun umsezten?