1

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:」を付けないと、メールが送信されません。これを修正する方法についてのアイデアはありますか?

4

2 に答える 2

0

smtpを追加する必要がある理由について、他の解決策や素晴らしい詳細な説明は提供していませんので、この回答に反対票を投じてください. :)

すでに回避策があるため、代わりに、これを修正する方法について実際のアドバイスを提供します。

  1. smtp:それが必要な場合は、コードを介していまいましいを前に追加するだけです
  2. ここで何が起こっているのかを把握する必要があるという TODO コメントを書きます。
  3. 次のタスクに進みます

もちろん、電子メールの送信が本当にアプリケーションの中核である場合や、他に何もすることがない場合は除きます。

于 2014-04-26T07:50:16.307 に答える