Hola amigos nuevamente recurriendo a ustedes.
Trabajo con: Delphi6, Indy9, FB2.0, Win11 64.
Problema: Estoy tratando de enviar correos usando Indy9 (desinstale los componentes anterior que vienen por default con delphi), gracias al club he logrado instalar los indy y tomar algo de codigo para hacer pruebas. Ya tengo un ratito (5 hrs) tratando de solucionar el siguiente problema.
Antes que nada colocaré el código q estoy usando para el envío de correo:
Código Delphi
[-]
procedure TfrmImpEnvioTCK.btnEnviarClick(Sender: TObject);
begin
idMessage1.Body.Clear();
idMessage1.Recipients.Clear();
idMessage1.Subject:='ENVIO TICKET - LAVANDERIA QUIJOTE';
idMessage1.Body.AddStrings(Memo1.Lines);
idMessage1.Recipients.EMailAddresses:=edMail.Text;
idMessage1.From.Address:='[email protected]';
idMessage1.From.Name:='LAVANDERIA ';
with idSMTP1 do
begin
Port:=587;
Host:='smtp.gmail.com';
AuthenticationType := atLogin;
Username:='[email protected]';
Password := 'jaklsdfkasldfl';
Connect();
btnEnviar.Enabled := false;
try
Send(IdMessage1);
ShowMessage('Correo enviado con éxito');
finally
btnEnviar.Enabled := true;
Disconnect;
end;
end;
end;
Y me esta marcando este error: (imagen)
https://ibb.co/nbKvqfS
Me hace falta algo mas que configurar?
La cuenta de correo gmail esta configurada para 2 pasos, cree una contraseña de aplicación para lograr el envío de correos desde delphi...sabes como puedo resolver el error??
Muchas gracias por su tiempo amigos.