Текущий архив: 2006.08.27;
Скачать: CL | DM;
Вниз
Отправка писем Найти похожие ветки
← →
Петюха (2006-08-05 02:04) [0]Я пытаюсь отправить письмо на почту, с помощью DELPHI, вот код:
procedure TForm6.Button1Click(Sender: TObject);
var
Msg: TIdMessage;
begin
Msg.Subject:="тема сообщения"; //текст темы сообщения
Msg.Recipients.EMailAddresses:="bbbbb51@mail.ru"; //указываем адрес получателя
Msg.From.Address:="batya15@rambler.ru"; //указываем автора письма
Msg.Body.Text:="текст сообщения"; //размещаем текст сообщения
Msg.Date:=StrToDate("01.12.2004");//дата отправки письма может быть любой
IdSMTP1.Connect;
if IdSMTP1.Connected=True then IdSMTP1.Send(Msg);
Form6.Caption:="Конец";
IdSMTP1.Disconnect;
end;
А он мне выбрасывает ошибку, вот:Access violation at address 00415482 in module "project.exe". read of address 003a0042
Помагите мастера, заранее благодарен!
← →
Пусик © (2006-08-05 02:11) [1]Перед заполнением полей объект Msg надо создать.
← →
Петюха (2006-08-05 02:52) [2]Пусик, ну пожалуйсто объясните что не так!
← →
Rial © (2006-08-05 03:52) [3]Msg:=TTdMesage.Create;
Try
Код
Finally
Msg.Free;
end;
Страницы: 1 вся ветка
Текущий архив: 2006.08.27;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.047 c
