Delphi：MAPI设置邮件优先级

Question

我正在使用JclMapi发送带有默认邮件客户端的电子邮件。 它一切正常，但我也想设置邮件优先级。但我还没有找到如何设置它。

任何人都可以帮助我吗？

这就是我的源代码：

MAPIJclEmail := TJclEmail.Create;
MAPIJclEmail.Recipients.Add(RecipientsTo, '', rkTo, '');
if RecipientsCC <> '' then
  MAPIJclEmail.Recipients.Add(RecipientsCC, '', rkCC, '');
if RecipientsBCC <> '' then
  MAPIJclEmail.Recipients.Add(RecipientsBCC, '', rkBCC, '');
MAPIJclEmail.Subject := Subject;
MAPIJclEmail.Body := HtmlBody;
// Priority?
for i := Low(FileNames) to High(FileNames) do
  Result := AddFileAsAttachment(FileNames[i]);
MAPIJclEmail.Send;