Получит письмо с нормальным телом

[iamur]

Доброе время суток всем!
В своей программе составляю письмо(тело многострочное) без вложений. Отправляю на свой же адрес. Как приходит - смотрю в почтовом клиенте. Что имею: Тело письма пустое, текст тела письма почему-то приаттачивается файлом с расширением .dat. В этом файле - моё многострочное тело письма что отправлял. Если отправлять письмо с вложением - то всё в порядке, тело - в теле, вложение - во вложениях.
Кто с таким сталкивался?

[Квэнди]

для начала попробуй поставить encoding в meuu если не поможет, показывай код

[iamur]

Покопался в Outlook и Mozilla.... не нашёл где там включить encoding
Вот код

procedure TForm1.Button3Click(Sender: TObject);
begin
  Mesg := TIdMessage.Create(Self);
  Mesg.CharSet := 'KOI-8';
  Mesg.Subject := 'тестик';
  Mesg.Recipients.EMailAddresses := 'XXX@XXXX.ru';
  Mesg.From.Address := 'XXX@XXX.ru';
  Mesg.Sender.Address := 'XXX@XXX.ru';
  Mesg.Body.Append('Привет!');
  Mesg.Body.Append('Это тестовое');
  Mesg.Body.Append('письмо');
  Mesg.Priority := mpNormal;
  Mesg.Date := Now;
  SMTP.Connect;
  if SMTP.Connected then begin
      SMTP.Send(Mesg);
      SMTP.Disconnect;
  end;
  Mesg.Destroy;
end;

[Квэнди]

Mesg.encoding:=meuu;

[iamur]

Благодарю за помощь!!!

.....блин....

[Квэнди]

Так заработало или нет ?

[iamur]

Заработало