IdOpenSSLSetLibPath('.\lib\');
SMTP := TIdSMTP.Create(nil);
SMTP.Host := 'smtp.mail.ru';
SMTP.Port := 465;
SMTP.AuthType := satDefault;
SMTP.Username := 'blabla@mail.ru';
SMTP.Password := '1111111';
SMTP.IOHandler := TIdSSLIOHandlerSocketOpenSSL.Create(nil);
SMTP.UseTLS := utUseRequireTLS;