alle Dateien in einem Ordner löschen die mit "_QS" anfangen?

[ak1]

Hallo Leute,
wie kann ich alle Dateien in einem Ordner löschen die mit "_QS" anfangen?


Gruß

[sakura]

Entweder in der DOS-Konsole:

Code:

del /s _QS*.*

oder du suchst hier nach FindFirst FindNext

......

[s14]

Delphi-Quellcode:

if FindFirst(PFAD + '_QS*.*', faAnyFile, sr) = 0 then
  repeat
    DeleteFile(PFAD + sr.Name);
  until FindNext(sr) <> 0;
  FindClose(sr);
end;

oder so ähnlich

[ak1]

Danke für die Tips, ich werds nachher mal ausprobieren.


Gruß