Delphi GEmail

Delphi-GEmail

Kelas Delphi untuk mengirim email menggunakan gmail.

Gunakan sampel:

  Gmail := TcfsGmail.Create( ' [email protected] ' , ' App password ' , ' From you/company ' );
  try
    try
      Gmail.Connect;
      Gmail.Send([ ' [email protected] ' ], ' Subject ' , ' PlainBody ' , ' htmlBody ' , ' AttachmentFile ' );
      // Gmail.Send(...);
      // Gmail.Send(...);
    except
      on E: Exception do
        ShowMessage(E.Message);
    end ;
  finally
    GEmail.Free;
  end ;
  

CATATAN 1: Tambahkan dua Perpustakaan openSSL ke jalur file yang dapat dieksekusi: "libeay32.dll" dan "ssleay32.dll".

CATATAN 2: Konfigurasikan akun email Anda "[email protected]" untuk mengizinkan pengiriman email dari dan aplikasi eksternal: Masuk ke Pengaturan Pribadi Anda (gmail), buka "Keamanan": Aktifkan "Verifikasi 2 Langkah" dan tambahkan "Kata Sandi Aplikasi" atau Aktifkan "Izinkan aplikasi yang kurang aman"

Info lebih lanjut: http://delphiprogrammingdiary.blogspot.com/2016/09/send-email-with-html-body-format-in.html http://www.andrecelestino.com/delphi-xe-envio-de- email-com-componentes-indy/