Заходим в делфи, создаем новый проэкт, кидаем на форму:
smemo
sRichEdit // Можете кинуть и мемо, но я решил ричедит и сделать текст красным.
idHTTP
IdSSLIOHandlerSocketOpenSSL
sButton
sLabel // 2 раза в моем случае 4
Создаем обработчик событий на кнопке и пишим:
procedure...