Enviando e-mails usando o Delphi 2010

Por esses dias passei por uma grande dificuldade para fazer algo simples como por exemplo, simplemente enviar e-mail utilizando o Delphi, pesquisando na internet achei diversos códigos e tutoriais não funcionais até que juntando partes consegui elaborar um de forma básica e simples, podendo ser aplicado em situações mais complexas e extremas.

Segue abaixo um print da tela exemplificando os componentes e os objetos utilizados neste projeto:

Segue o print do código abaixo para o funcionamento do envio do email: