0

Добрый час, уважаемые программисты! Сохраняю письма вложений следующим образом:

TIdAttachment(IdMessage1.MessageParts.Items[intIndex]).SaveToFile(file);

Сохраняется всё замечательно, однако заметил, что если сохраняемые файлы имеют одинаковые названия, то возникает ошибка сохранения. Мне необходимо заменить существующий файл на последний. Существует ли какой-нибудь встроенный метод либо какая-либо альтернатива?

5
  • GetTempFileName 23 мая 2014 в 10:55
  • @Yura Ivanov Спасибо, а есть пример? 23 мая 2014 в 11:31
  • Полно. указываете префикс в виде вашего имени файла, получаете имя, которое сто процентов будет не занято. 23 мая 2014 в 11:49
  • @Yura Ivanov а возможно чтобы он генерировал не случайные имена, а конкретные? 23 мая 2014 в 12:08
  • @АлександрЪ, смысл этой функции как раз в том, чтоб не проверять существует ли файл. если вам надо генерить ваши имена, тогда вручную придется проверять существует файл или нет. вам решать что нужнее. 23 мая 2014 в 15:48

1 ответ 1

1
uses SysUtils;
...
if FileExists(file) then
  DeleteFile(file);
TIdAttachment(IdMessage1.MessageParts.Items[intIndex]).SaveToFile(file);

file - плохое имя для переменной, пересекается с ключевыми словами языка. Лучше FileName.

2
  • @kot-da-vinci Благодарю! Да, Вы правы на счет переменной, я ее только здесь так обозвал)) За способ - благодарю, однако, решил заменять имена файлов с целью сохранения всех версий (т. е. qwe.jpg, qwe(1).jpg, qwe(2).jpg ...). 23 мая 2014 в 10:53
  • @АлександрЪ Тоже вариант 24 мая 2014 в 6:55

Ваш ответ

By clicking “Отправить ответ”, you agree to our terms of service and acknowledge you have read our privacy policy.

Всё ещё ищете ответ? Посмотрите другие вопросы с метками или задайте свой вопрос.