Membuat Alert Notifikasi Pada Sudut Kanan Bawah Layar Dengan Delphi 7

Alert Notifikasi adalah sebuah tanda untuk menandakan ada sesuatu yang telah terjadi, ini sering kita jumpai misal pada Antivirus apabila ada virus terdeteksi. Alert ini juga sangat cocok digunakan apabila kita menggunakan SMS Gateway sebagai notifikasi adanya pesan masuk seperti pada aplikasi modem. Berikut tampilan alert yang akan dibuat, alert ini terletak pada sudut kanan bawah dari layar monitor diatas taskbar windows.

OS : Windows XP, Vista, 7 32/64 Bit, 8 32/64 Bit

Delphi : Delphi 7

Untuk membuatnya, tentunya Delphi 7 harus sudah terinstall terlebih dahulu :D . Cukup sediakan sebuah komponen Button (TButton) dan sebuah komponen EditText (TEdit) seperti pada gambar.

Isikan pada Edit pesan yang ingin ditampilkan pada saat kemunculan alert, disini dicontohkan dengan kalimat “Ada Pesan Masuk”, dapat diganti sesuai keinginan.

Setelah sesuai design, maka kita akan membuat procedure alert terlebih dahulu, ketikkan potongan kode di dalam kotak warna merah (lihat gambar) tepat di bawah kode “{$R *.dfm}”.

Setelah itu klik double klik button (Button1) dan ketikkan potongan kode di dalam kotak merah (lihat gambar)

Kemudian copy-kan file “Alert.dll” dan file “Email-icon.bmp” yang terdapat dalam folder ke project anda (lihat gambar lagi :D), jangan sampai lupa ya.. ^_^ . file “Email-icon.bmp” adalah file gambar yang akan digunakan untuk memperbagus alert, file gambar harus format .bmp, gambar dapat diganti sesuai dengan selera masing-masing.

Terakhir klik run, hasilnya sebagai berikut :

Sekian tutorial yang tak seberapa ini, semoga bermanfaat untuk para Delphier dan semakin bersemangat untuk ngoding. Terima Kasih dan tetap semangat :)

Download source code dan tutorial di sini

• Tweet
• Share