Пятница, 14 Августа 2015 г. 06:33
+ в цитатник
Доброго дня, уважаемые жители Королевства.
Столкнулся я со следующей проблемой. У меня происходит отправка файлов адресату
IdMessage := TIdMessage.Create(nil);
try
if Assigned(Files) then for I := 0 to Files.Count - 1 do
if FileExists(Files[I]) then //Прикрепляем к письму файлы
TIdAttachmentFile.Create(IdMessage.MessageParts, Files[I]);
IdSMTP := TIdSMTP.Create(nil);
try
with IdMessage do
begin
From.Address := AFrom;
Sende ...
http://www.delphikingdom.com/asp/answer.asp?IDAnswer=83028
-
Запись понравилась
-
0
Процитировали
-
0
Сохранили
-
