Sobre error para enviar email por gmail

[lduron]

Hola Amigos!

Tengo el siguiente código:

procedure TForm1.Button1Click(Sender: TObject);
begin
IdMessage1.Clear;
IdMessage1.From.Address:='[email protected]';
IdMessage1.Subject:='Hola';
IdMessage1.Body.Text:='Hola como te va?';
IdMessage1.Priority:=TIdMessagePriority(mpNormal);
IdSMTP1.Port:=587;
IdSMTP1.Host:='smtp.gmail.com';
IdSMTP1.UseTLS:=utUseRequireTLS;
IdSMTP1.Username:='x';
IdSMTP1.Password:='x...';
IdSMTP1.Connect;
IdSMTP1.Send(IdMessage1);
IdSMTP1.Disconnect;
end;

Y me manda el siguiente error:

Project:Project1.exe raised exception class EIdTLSClientSSLIOHandlerRequred with message 'SSLIOHandler is required for this setting'

A que se refiere con esto?

Muchas gracias por la atención que tiene para leer este mensaje.