Компоненты для отправки почты

← →
метеоролог (2004-02-10 14:54) [0]

Подскажите пож-та какими компонентами в 7-ом Delphi пользоваться, чтобы отправить из программы посчитанные файлы.

← →
8ung © (2004-02-10 15:02) [1]

IdSMTP,IdNNTP,IdPOP3 все это есть в стандартной поставке Delphi 7

← →
метеоролог (2004-02-10 15:13) [2]

Спасибо за ответ. Но не могу разобраться в свойствах этих компонент. Где указывать адрес получателя, где указывать имена присоединенных файлов, и адрес отправителя. Помогите, пожалуйста.

← →
Oyster © (2004-02-10 15:23) [3]

Берем книжку и читаем. Если книжки нет, то идем и покупаем.

← →
метеоролог (2004-02-10 16:19) [4]

Тогда для чего существует конференция, если Вы мне так отвечаете?! По-моему,по вопросу понятно, что книжки нет и купить негде!

procedure TForm1.ConnectExecute(Sender: TObject);
begin
IdSmtp1.Host:=Form2.Edit1.Text; //Хост к которому присоеденяюсь
IdSmtp1.Username:=Form2.Edit2.Text; //Имя пользователя
IdSmtp1.Password:=Form2.Edit3.Text;// пароль (если нужен)
IF Form2.RbCheckBox1.Checked Then
Begin
IF Form2.ComboBox1.Text="None" Then
Idsmtp1.AuthenticationType:=AtNone; // без пароля
IF Form2.ComboBox1.Text="Login" Then
Idsmtp1.AuthenticationType:=AtLogin; // с паролем
End;
Try
IdSmtp1.Connect(); // соеденяюсь с Smtp сервером
Except
End;

procedure TForm1.SendExecute(Sender: TObject);
begin
IF not IdSmtp1.Connected Then
Connect.Execute;
Try
IdMessage1.From.Name:=Edit1.Text; // от кого
IdMessage1.From.Address:=Edit2.Text; // обратный адресс
IdMessage1.Recipients.Add.Address:=+Edit3.Text; // кому
IdMessage1.Subject:=Edit4.Text; // Субьект
IdMessage1.Body.Add(M); // Само сообщение
IdSmtp1.Send(IdMessage1); // отправка письма
Finally
IdMessage1.Clear; // очистка IdMessage
IdSmtp1.Disconnect; // отсоеденение от сервера
End;

Следует учесть, что на форме помимо IdSmtp1 должен присутствовать IdMessage1, также невредно скинуть на форму idAntiFreez
Удачи и с праздником =)

Компоненты для отправки почты Найти похожие ветки