exemplo de enviar e-mail do usuário marchio.theis

boa tarde galera, nao sei se vcs já passaram por isso, mas baixei um exemplo do nosso ilustre companheiro marchio.theis aqui do forum que ensina como enviar e-mail pelo delphi.

o meu funciona perfeitamente, só que, ao chegar o e-mail pra pessoa, ele chega com umas mensagens estranhas... alguem sabe como resolver isso? segue abaixo um exemplo e-mail que chega para quem recebe:

This is a multi-part message in MIME format --JhSR9SbL=_SAHNL24xjxbwn7L5ckjWlLAi Content-Type: text/plain Content-Transfer-Encoding: quoted-printable =20 --JhSR9SbL=_SAHNL24xjxbwn7L5ckjWlLAi Content-Type: text/html Content-Transfer-Encoding: quoted-printable Venda N=FAmero Pedido: 00004 Cliente: GERALDO DOS SANTOS VILELA Funcio= n=E1rio: M=C1RIO S=C9RGIO MF 054 RELOGIO TEMPERATURA 76 1 76 BA 82061 BOMBA COMBUSTIVEL BA 25 1 25 GAI 933 ALICATE DE BICO 23,75 1 23,75 --JhSR9SbL=_SAHNL24xjxbwn7L5ckjWlLAi--