Forum: Object-Pascal / Delphi-Language
Delphi
by xZise,
3. Aug 2006
Und das würde er auch da tun...
Aber ich habe das in der DH gelesen:
Gibts vielleicht eine möglichkeit: faAnyFile und nicht faDirectory?
:spin2: :roteyes: o.O Cool mit faAnyFile + not faDirectory funktionierts O.o :roteyes: :spin2:
Vielleicht kann man auch direkt Verzeichnisse verbieten :P
Forum: Object-Pascal / Delphi-Language
Delphi
by xZise,
3. Aug 2006
Wegen diesem Pänomen ist ja das FileExists drinne (weil sie von FileExists nicht gefunden werden). Allerdings soll er est gar nicht bei FindFirst anspringen ;)
Forum: Object-Pascal / Delphi-Language
Delphi
by xZise,
3. Aug 2006
Wenn ich einen Ordner durchsuche:
if FindFirst(path + 'GameData\Cache\*.*', faAnyFile, sr) = 0 then begin
repeat
if FileExists(path + 'GameData\Cache\' + sr.Name) then begin
inc(FilesNum);
DeleteFile(path + 'GameData\Cache\' + sr.Name);
pbStatus.Max := Succ(pbStatus.Max);
pbStatus.StepIt;
Form2.Repaint;
end;