

kali ini saya akan berbagi source code Pesan, sebenarnya banyak cara/code yang dapat digunakan untuk menampilkan pesan di delphi.
dan kali ini saya akan men demo kan beberapa procedur yang bisa digunakan untuk menampilkan pesan di delphi.
simak yahhh

1. Buka Delphi nya File – New – Form
2. Buat Button pada form.
3. Gunakan Code-code berikut untuk menampilkan pesan.
- ShowMessage Standard
ShowMessage('Hello ini adalah blog damblue.com');
- Message Dialog Information
MessageDlg('Ini adalah Contoh Dialog Information!',mtInformation,[mbok],0);
- Message Dialog Warning
MessageDlg('Ini adalah Contoh Dialog Warning!',mtWarning,[mbok],0);
- Message Dialog Error
MessageDlg('Ini adalah Contoh Dialog Error!',mtError,[mbok],0);
- Menampilkan Pesan Konfirmasi
if(application.MessageBox('Apakah anda setuju ?','Konfirmasi',MB_YesNo)=ID_yes) then
begin
showmessage('Ini adalah Pesan Bahwa anda setuju');
end
else
begin
showmessage('Ini adalah pesan bahwa anda tidak setuju');
end;

wassalam…
Tidak ada komentar:
Posting Komentar