Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Компонент TNMSMTP


Max!!!! ©   (2004-05-06 08:59:00) 

В Дельфях 6-ке был компонент TNMSMTP в закладке FastNet, в 7-ке что-то я такого не наблюдаю. Существует ли он в природе? И где его найти, если он есть?


Max!!!!   (2004-05-06 14:48:00) [1]

Все, спасибо!
разобрался сам
TIdAttachment.Create(Msg.MessageParts, Attachment.Strings[I]);


Андрей Сенченко   (2004-05-06 14:16:00) [2]

Изначально код не мой, переделывал под себя.
У меня работает

procedure SendMail;
var
 LSMTP: TIdSMTP;
 LMsg: TIdMessage;
begin
 LSMTP := TIdSMTP.Create(nil);
 LMsg := TIdMessage.Create(LSMTP);

with LMsg do
 begin
   CharSet :=
   From.Name :=
   From.Address :=
   Recipients.EMailAddresses
   Subject :=
   Body.Text :=
   TIdAttachment.Create(LMsg.MessageParts, ...);
 end;

with LSMTP do
 begin
   AuthenticationType:=atLogin;
   Port :=
   Host :=
   UserId :=
   Password :=
   try
     Connect;
     Send(LMsg);
   except
     on e:exception do
     begin
       showmessage (Trim(e.message));
     end;
   end;
   Disconnect;
 end;
 FreeAndNil(LMsg);
 FreeAndNil(LSMTP);
end;


Max!!!!   (2004-05-06 13:06:00) [3]

Что-то я поискал в этом компоненте, ни как не могу найти где есть возможность прицепить файлы.


Delphin   (2004-05-06 11:40:00) [4]

какая разница, его же всё равно не видно в самой программе, главное его функциональность


Max!!!!   (2004-05-06 11:15:00) [5]

В курсе, но он такой уродский


Chris   (2004-05-06 09:28:00) [6]

На закладке Indy Clients есть компонент idSMTP (синий почтовый ящик)


Наверх

Титульная страница Поиск, карта сайта Написать письмо