使用Thunderbird从Delphi发送邮件

Question

我需要使用Thunderbird和Delphi XE3发送带附件的电子邮件.我不知道从哪里开始所以我问​​是否有人链接到我可能找到信息的网站.

Answer 1

从文档中,您可以使用Thunderbird的命令行选项,因此我认为使用ShellExecute应该可行.我没试过这个.

ShellExecute(Handle, 'path\to\thunderbird.exe',
    '-compose "to=foo@nowhere.net,attachment=''file:///c:/test.txt''", 
    nil, SW_SHOWNORMAL);