|
(Co-Admin)
Registriert seit: 29. Mai 2002
Ort: Hamburg
11.117 Beiträge
Delphi 11 Alexandria
|
24. Mai 2003, 15:06
Moin Tino,
diese Abfrage ist falsch.
if SR.Name[1] <> '.' then ...
Du musst explicit auf <> '.' und <> '..' prüfen, denn es ist durchaus zulässig, dass Verzeichnis- / Dateinamen mit einem Punkt beginnen.
Eventuell solltest Du statt UpperCase lieber AnsiUpperCase verwenden, damit auch Umlaute korrekt umgewandelt werden.
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
|