Indy 10 - IdSMTP.Send()在从GMail帐户发送邮件时挂起

Luk*_*Led 6 delphi gmail smtp indy delphi-7

我正在尝试使用这些设置使用gmail帐户(Delphi 7,Indy 10)发送电子邮件:

TIdSmtp:

Port = 587;
UseTLS := utUseExplicitTLS;
Run Code Online (Sandbox Code Playgroud)

TIdSSLIOHandlerSocketOpenSSL:

SSLOptions.Method := sslvTLSv1;
Run Code Online (Sandbox Code Playgroud)

一切似乎都设置好了.我收到了这个回复:

Resolving hostname smtp.gmail.com.
Connecting to 74.125.77.109.
SSL status: "before/connect initialization"
SSL status: "before/connect initialization"
SSL status: "SSLv3 write client hello A"
SSL status: "SSLv3 read server hello A"
SSL status: "SSLv3 read server certificate A"
SSL status: "SSLv3 read server done A"
SSL status: "SSLv3 write client key exchange A"
SSL status: "SSLv3 write change cipher spec A"
SSL status: "SSLv3 write finished A"
SSL status: "SSLv3 flush data"
SSL status: "SSLv3 read finished A"
SSL status: "SSL negotiation finished successfully"
SSL status: "SSL negotiation finished successfully"
Cipher: name = RC4-MD5; description = RC4-MD5                 SSLv3 Kx=RSA      Au=RSA  Enc=RC4(128)  Mac=MD5 
; bits = 128; version = TLSv1/SSLv3;
Run Code Online (Sandbox Code Playgroud)

然后它挂起并没有完成.电子邮件未发送.可能是什么问题?

Luk*_*Led 3

问题很简单。我不够耐心,应用程序没有挂起,超时很长。超时是由于错误设置造成的。