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

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

Component TIdMessage


Gala_l ©   (2005-10-24 23:14:00) 

Pomogite prikrepit Attachment k soobsheniju. Pisma otsilajutsja i polushajutsa, a prikrepit Attachment ne mogu.

Spasibo


Gala_l   (2005-10-25 18:09:00) [1]

Uvazemii Vai,
Help ja chitaju, ne perezivaite i, estestvenno smotrela demo. No mne kazalos, chto forumi na to i suchestvujut, chto bi mozno bilo zadat vopros, i poluchit inogda normalnii otvet.

Palve, spasibo


palva   (2005-10-25 10:52:00) [2]

Вай   (25.10.05 07:19) [3]
> хм а прочитать хелп и поглядеть демо уже не судьба :(((
хм а сходить на другой форум уже не судьба?
http://www.developing.ru/forum/viewtopic.php?p=5264

Несмотря на то, что автору не ответили, и он нашел решение сам, там его даже попросили "может Вы закинете сюда решение? Это сделает форум более содержательным. Спасибо."


Вай   (2005-10-25 07:19:00) [3]

хм а прочитать хелп и поглядеть демо уже не судьба :(((


Gala_l   (2005-10-25 01:56:00) [4]

Thanks, I'll try it


palva   (2005-10-25 01:12:00) [5]


uses IdMessage;
procedure TForm1.Button1Click(Sender: TObject);
var
 msg:TIdMessage;
begin
 IdSMTP1.Connect();
 msg := TIdMessage.Create(Form1);
 msg.Recipients.Add.Address := 'pa@mail.ru';
 msg.From.Address := 'pa@mail.ru';
 msg.IsEncoded := True;
 TIdAttachment.Create(msg.MessageParts, 'D:\dsc02745.jpg');
 IdSMTP1.Send(msg);
 IdSMTP1.Disconnect;
 msg.Free;
end;


Наверх

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