Delphi - Indy -Kodovani predmetu zpravy pri odesilani emailu

[M]

Nevite nekdo prosim jak nastavit kodovani cestiny (8859-2) u predmetu, jmena odesilatele apod. u emailu odesilaneho pomoci INDY?

Diky moc za jakoukoli pomoc

[Howard]

Nevim, jestli ti to pomuze, ale hrozne me to pripomina problemy s posilanim mejlu v PHP, tak ti sem hodim jednu funkci, ktera resi problem s kodovanim cestiny v predmetu mejlu - psana samozrejme v PHP, snad se v tom vyznas.

Kód: Vybrat vše

function email($komu, $predmet, $text, $hlavicky = '')
{
  // prekodovani windows-1250 do iso-8859-2
  $text = StrTr($text,"\x8A\x8D\x8E\x9A\x9D\x9E", "\xA9\xAB\xAE\xB9\xBB\xBE");
  $text = Base64_Encode($text); // text do Base64
  $hlavicky .= "MIME-Version: 1.0\n" . "Content-Type: text/plain; charset=\"iso-8859-2\"\n". "Content-Transfer-Encoding: base64\n";
  mail($komu, $predmet, $text, $hlavicky); // odeslání
}[/