[ApplicatiOn]

вот прикрепляю файл, всё норм отправляет...

делаю так:

Код:

TIdAttachment.Create(MailMessage.MessageParts,edit1.Text);

после когда хочу поменять файл, он отправляет и старый и новый, а после еще и еще и зависает...

я так понимаю TIdAttachment.Create добавляет файлы.. как можно удалить файл из MailMessage и после загрузить по-новой?

[ApplicatiOn]

неужели никто незнает?

[ApplicatiOn]

в MailMessage не видел.

TIdAttachment.Destroy не существует...

подскажите кто знает

[lmikle]

Похоже такого не существует.
Можно посоветовать хранить все в отдельных переменных, а TIdMessage заполнять только перед собственно отправкой.

[Vayrus]

Попробуй перед использованием занилить MailMessage или MessageParts, я как то решал эту проблему, но исходников проги под рукой нет, влом искать

[ApplicatiOn]

Сообщение от lmikle

Похоже такого не существует.
Можно посоветовать хранить все в отдельных переменных, а TIdMessage заполнять только перед собственно отправкой.

в процессе заполненния он их заполняет, а вот потом когда следующая отправка идет, он опять заполняет, а старое остается. и уже приходит не один файл, а 2. В след. письме 3 и т.д.

Сообщение от Vayrus

Попробуй перед использованием занилить MailMessage или MessageParts

я знаю что надо занилить, только незнаю как...

[Vayrus]

MailMessage := NIL;
или
MessageParts := NIL;

[ApplicatiOn]

Сообщение от Vayrus

MailMessage := NIL;
или
MessageParts := NIL;

если бы

"Cannot assign to a read-only property"

[ApplicatiOn]

попробовал сделать вот так вот:

Код:

 if MailMessage.MessageParts.AttachmentCount > 0 then
 MailMessage.MessageParts.Delete(MailMessage.MessageParts.AttachmentCount);

частенько вылетает ошибка "List Bounds (1) " и файл не меняется, а остается старый.. но думаю копать надо где-то здесь...

[lmikle]

Код:

MailMessage.MessageParts.Delete(MailMessage.MessageParts.AttachmentCount-1);

Удаляется последний. просто нумерация списков идет с 0. Поэтому ты и получаешь блямс.

[ApplicatiOn]

Сообщение от lmikle

Код:

MailMessage.MessageParts.Delete(MailMessage.MessageParts.AttachmentCount-1);

Удаляется последний. просто нумерация списков идет с 0. Поэтому ты и получаешь блямс.

у меня была на этот счет мысль) попробую..)

[ApplicatiOn]

отлично, получилось.. спасибо