Delphi JvMail（绝地）组件不发送邮件

JvMail组件运行不正常，或者我搞乱了 出了点事

procedure TForm1.RzURLLabel1Click(Sender: TObject);
begin
if cxLookUpComboBox1.Text ='' then
abort else
with JvMail1.SimpleMAPI do
begin
JvMail1.Clear;
JvMail1.Recipient.AddRecipient('smtp:mymail@gmail.com');
JvMail1.Subject := 'Password lost  ';
JvMail1.Body.Text := 'Request password  :' +#13#10+  cxLookUpComboBox1.Text +#13#10+  AdvOfficeStatusBar1.Panels[4].Text ;
JvMail1.SendMail;
end
end;

我的邮件不会被发送，除非我在邮件地址前加上前缀“smtp:”。

---

关于如何解决这个问题，有什么想法吗？

关于为什么需要添加smtp，我没有提供任何其他解决方案或深入的解释，所以请随意否决这个答案。：）

您已经有了解决方法，因此我将给出一些关于如何解决此问题的实际建议：

只要通过代码预先添加该死的

smtp:

，如果需要的话

写一篇待办事项评论，说你需要弄清楚这里发生了什么

继续你的下一个任务

当然，除非发送电子邮件真的是你应用程序的核心，或者你真的没有更好的事情要做

问题很清楚

注意事项：

参数address指定的地址格式为[address] 键入][电子邮件地址]。有效地址的示例包括 传真：206-555-1212和SMTP:M@X.COM.

说明：

以下代码将收件人添加到收件人列表：

JvMail1.Recipient.AddRecipient（'SMTP:someone@somedomain.com","某人",

SMTP的问题是它在Outlook中保持可见，这有点难看。其实，我在网上看到了很多例子，但是没有一个是smtp前缀。实际上，我是从Mike Shkolnik那里知道这个前缀的，他只是在遇到麻烦时才指出它的。这就是为什么我认为这是一件令人讨厌的事。。。。非常感谢。