|
(Co-Admin)
Registriert seit: 29. Mai 2002
Ort: Hamburg
11.117 Beiträge
Delphi 11 Alexandria
|
Re: Verzeichnisse loeschen die Nicht leer sind ?
18. Nov 2004, 21:37
Moin TypusMensch,
dieser Teil hier
and (rec.Name[1] <> '.')
ist falsch.
Man muss explizit auf
and (rec.Name <> '.') and (rec.Name <> '..')
prüfen, da führende Punkte in Datei-/Verzeichnisnamen zulässig sind.
Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist
|