Цитата:
|
Сообщение от Snake22
нет. надо все файлы по имени перебирать.
|
У меня по заданию нужно, чтобы все файлы с расширением *.txt из папки Мои документы удалялись. И я только что попробовал сделать вот так:
Код:
procedure TForm1.Button1Click(Sender: TObject);
begin
DeleteFiles(GetMyDoc+'\*.txt');
end;
И у меня все работает. Не знаю, может есть еще другой способ???????