[mRoman]

Amigos, retomando el tema:

Instalé en una Maquina virtual win7 32 bits, instalé Delphi7, Desinstalé Indy9 e Instalé Indy10.

Lo anterior para hacer pruebas de envío de correo.

CASIMIRO me paso unas DLL que ya bajé y copié al mismo directorio donde esta mi ejecutable.

Envía el siguiente error

https://ibb.co/dJS2vMn

CODIGO

Código Delphi [-]
procedure TForm1.btnEnviarClick(Sender: TObject);
begin
    SMTP.Port     :=587;
    smtp.Host     :='smtp.gmail.com';
    smtp.AuthType :=atDefault;
    smtp.Username :='[email protected]';
    smtp.Password :='fayhxquevfbflre';
    smtp.IOHandler:=IdSSLIOHandlerSocketOpenSSL1;
    smtp.UseTLS   :=utUseExplicitTLS;

     with correo do
     begin
          Recipients.Add;
          Recipients[0].Name:='CLIENTE';
          Recipients[0].Address:='[email protected]';
          From.Name:='LAVANDERIA';
          From.Address:='[email protected]';
          Subject:='Envío de nota 99999 - LAVANDERIA';
          Body.Text:='CORREO DE PRUEBA';
     end;

     smtp.Connect;
     try
       try
         smtp.Send(correo);
         ShowMessage('Correo enviado satisfactoriamente');
       except
         on E: Exception do
            ShowMessage(E.Message);
       end;
     finally
       if smtp.Connected then
          smtp.Disconnect;
       correo.Free;
       smtp.Free;
     end;

end;

Agradeciendo sus aportes y comentarios de antemano, muchas gracias. Como puedo corregir este error??

p.d.1 Casimiro, gracias por último aporte -código- q me enviaste en este hilo, si me ayudó.
p.d.2 También copie las DLL en Windows\System32

Saludos y Gracias.