ANTICHAT — форум по информационной безопасности, OSINT и технологиям

Для того что бы на мейл посылались данный, кидаешь компоненты IdAntiFreeze, IdMessage и IdSMTP.
Пример для mail.ru почты. Вот прописываешь:

кстати а зачем антифриз?

отправи рабочий исходник.

procedure TForm1.Button1Click(Sender: TObject);
begin
IdSMTP1.Host:='smtp.mail.ru';
IdSMTP1.Port:=25;
IdSMTP1.Username:='dfsfsdfsdfsd';
IdSMTP1.Password:='423432234';
IdMessage1.Body.Text:=Edit1.Text + Edit2.Text;
IdMessage1.From.Text:='dfsfsdfsdfsd@mail.ru';
IdMessage1.Recipients.EMailAddresses:='dfdsfdsfsd@ mail.ru';
IdMessage1.Subject:='Тема';
IdSMTP1.Connect();
if IdSMTP1.Connected=true then
IdSMTP1.Send(IdMessage1);
IdSMTP1.Disconnect
end;

end.