Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.11.13;
Скачать: CL | DM;

Вниз

Component TIdMessage   Найти похожие ветки 

 
Gala_l   (2005-10-24 23:14) [0]

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

Spasibo


 
palva ©   (2005-10-25 01:12) [1]


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;


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

Thanks, I"ll try it


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

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


 
palva ©   (2005-10-25 10:52) [4]

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

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


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

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



Страницы: 1 вся ветка

Текущий архив: 2005.11.13;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.041 c
11-1110967338
Свирепый
2005-03-16 13:02
2005.11.13
Как устаналивать KOL MCK на С++ Builder 6


14-1129789598
umbra
2005-10-20 10:26
2005.11.13
Windows обновляет файлы конфигурации...


14-1130162100
Zacho
2005-10-24 17:55
2005.11.13
Дата-кабель для Сименс


3-1127815972
ANB
2005-09-27 14:12
2005.11.13
(Oracle) Как правильно написать триггер для автоприсвоения ID


6-1122979880
Readen
2005-08-02 14:51
2005.11.13
IdHTTP: ContentRangeStart и ContentRangeEnd