Mengirim dan Menerima Email dengan Delphi

Banyak sekali komponen Delphi untuk mendownload dan mengirim email dari aplikasi yang kita buat. Salah satunya dengan menggunakan library sederhana dari Synapse.

Untuk mengirim email, (cukup Uses module smtpsend), langkahnya sangat mudah:

SendToEx(fromAddress, toAddress, subject, smtpAddress, emailMessage,
userName, password);

Untuk menerima, gunakan TPOP3Send dari unit pop3send.
Langkahnya:
1. Create object TPOP3Send
2. Isi username, password, pop3Address dan atau pop3port
3. Panggil method Stat untuk melihat inbox
4. Jumlah email yang tersedia bisa diakses dari property StatCount
5. Download dengan method Retr (dengan parameter index:integer, mulai dari 1)
6. Isi email dan header bisa dilihat di property FullResult

Cukup cepat dan fleksibel. Alternatif lain dengan menggunakan komponen bawaan dari Delphi yaitu Indy.