Slanje mail-a SMTP-om

Code:

        IdMessage1.Clear;
        IdMessage1.Encoding := meMIME;
        IdMessage1.ContentType := 'multipart/text; charset=ISO-8859-2';
        IdMessage1.Recipients.EMailAddresses := self.Param.RecipientsEMaliAddres + '; ' + self.Param.RecipientsEMaliAddres2;
        IdMessage1.From.Address := self.Param.FromAddres; // please change to your gmail address //;
        IdMessage1.From.Name := Utf8ToAnsi(self.Param.FromName);
        IdMessage1.Subject := self.Param.Subject;
        IdMessage1.Body.Clear;
        mt1 := TIdText.Create(IdMessage1.MessageParts, nil);
        mt1.Body.LoadFromFile('c:\temp\Plain_false.html');
        mt1.ContentType := 'text/html';
        mt1.CharSet := 'ISO-8859-2';

Code:

<HTML>
  <HEAD>
    <TITLE></TITLE>
  </HEAD>
  <BODY>

<P STYLE="text-align: left;">
<SPAN style="color: #000000; font-size: 8pt; font-family: Tahoma;">
Rje&scaron;enje o dodjeli koda u prilogu.
<BR>
<BR>Original Rje&scaron;enja zaprimit ćete po&scaron;tom.
<BR>
<BR>
<BR>
<BR>
<BR>Dodatne informacije o kodovima možete naći na na&scaron;im web stranicama.
<BR>
</SPAN>
</P>

  </BODY>
</HTML>