Indy10で添付ファイルを送信する方法


2051  2008-03-14 18:49:06  No: 30159

Delphi7 ProでIndy10を使用してメール送信するプログラムを
作成しています。
添付ファイルを送信する機能があり、実装のやり方がわからず悩んでいます。

      //添付ファイル aattach を msg に追加
      with TIdAttachment.Create(msg.MessageParts, aattach) do
      begin
        FileName := jconvert.ConvertJCode(ExtractFileName(aattach), JIS_OUT);
      end;

といったやりかたを  http://oto.chu.jp/kujira/text/delphi/mail/sendmail.htm
のページで見つけましたが、Indy9と10では
TIdAttachment.Createの引数が異なるようです。
よってやり方も変わるのではないかと思っているのですが・・・

        with TIdAttachment.Create(idmsg.MessageParts) do begin;
            FileName := 'C:\test.bmp';
        end;

上記のコーディングで実行したらAbstractエラーが発生しました。

詳しい方がいらっしゃたらご教授ください。
よろしくお願い致します。


※返信する前に利用規約をご確認ください。

※Google reCAPTCHA認証からCloudflare Turnstile認証へ変更しました。






  このエントリーをはてなブックマークに追加