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

Вниз

Отправка почты в Дельфи   Найти похожие ветки 

 
Aleks1995   (2011-07-24 02:15) [0]

Здравствуйте мастера! Нужен ваш совет. Делаю в проге отсылку сообщения пользователя на свое мыло. Код:
 idSMTP1.Host:="smtp.mail.ru";
 idSMTP1.Port:=25;  
 idSMTP1.Username:="mail@mail.ru;
 idSMTP1.Password:="password";    
 idSMTP1.AuthenticationType:=atLogin;
with IdMessage1 do
    begin
     Body.Assign(Memo1.Lines);
     From.Text := "mail@mail.ru";
     Recipients.EMailAddresses := "mail@mail.ru";
     Subject:="Пожелания,замечания";
     end;
  idSMTP1.Connect;
  try
 idSMTP1.Send(IdMessage1);
  finally
     idSMTP1.Disconnect;
  end;
Application.MessageBox(PChar("Сообщение отправлено"),"Информация", MB_OK+MB_ICONINFORMATION);
Все работает, только если текст писать в Мемо по русски,то приходят в тексте письма иероглифы. Как привести их читабельный вид? У меня Дельфи 7, ОС ВинХР сп3


 
antonn ©   (2011-07-24 11:29) [1]

"по-русски" пишется через дефис :)
кодировку нужно указать, как на инди - не знаю


 
sniknik ©   (2011-07-24 11:32) [2]

 with IdMessage1 do begin
   Encoding   := meMIME;
   CharSet    := "Windows-1251";
   ContentType:= "text/plain";


для Subject
http://www.delphimaster.ru/cgi-bin/faq.pl?look=1&id=988618939&n=19


 
Aleks1995   (2011-07-24 12:32) [3]

>sniknik
Спасибо огромное!!! Все заработало как надо! :)


 
Dennis I. Komarov ©   (2011-07-25 10:24) [4]

RFC и индейцы умрут...



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

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

Наверх




Память: 0.47 MB
Время: 0.007 c
15-1311014236
NailMan
2011-07-18 22:37
2011.11.13
Шутим тут, плюшками балуемся...


15-1310726381
Дмитрий С
2011-07-15 14:39
2011.11.13
Эх так приятно, когда...


15-1310671161
R_R
2011-07-14 23:19
2011.11.13
Программа-клиент не "видит" сервер...


2-1311508935
prodex
2011-07-24 16:02
2011.11.13
Как построить запрос в Oracle, если...


15-1310539493
SQLEXPRESS
2011-07-13 10:44
2011.11.13
Ctrl+shift+с во время описания класса. Некорректно