Thema: Delphi FindFirst/FindNext BUG

Einzelnen Beitrag anzeigen

Nightshade

Registriert seit: 7. Jan 2003
Ort: Menden
192 Beiträge
 
Delphi 7 Enterprise
 
#13

Re: FindFirst/FindNext BUG

  Alt 3. Dez 2004, 18:41
Zitat von Christian Seehase:
Moin Nightshade,

noch ein Bug in Deiner Routine:

if copy(fsr.name,1,1) <> '.then es muss explizit auf <> '.' und <> '..' geprüft werden, da eine Datei/Verzeichnisname durchaus mit einem Punkt beginnen darf.
Jau, hast recht...
Christian
Killing for peace is like fucking for virginity

Nightshade
  Mit Zitat antworten Zitat