Отправка сообщения на E-mail через SMTP

Как отправить сообщение на почту через Delphi? Очень просто!
И так, начнем с самого обычного процесса: кидания компонентов на форму :)

1. Компонент IdSMTP из вкладки Indy Clients;
2. Компонент IdMessage из вкладки Indy Misc;
3. Компонент IdEncoderMIME1 из вкладки Indy Misc;
4. Компонент Button из вкладки Standart.

После строки {$R *.dfm} пишем код. Комментарии внутри.