Mengenal dan Menggunakan Beberapa Jenis MessageBox Di Delphi

MessageBox adalah Kotak dialog berfungsi untuk memberikan Respon terhadap user. Atau kotak pesan yang menampilkan peringatan atau perintah pada komputer.Ada beberapa macam model MessagBox di Delphi diantaranya:

1.       ShowMessage

2.       Messagedlg

3.       Dan Application.MessageBox

Penggunaan MessageBox ShowMessage

Syntak Program :

ShowMessage('Anda Tidak Mendapat Diskon karena total belanja < 100.000' );

Keterangan

Syntak diatas hanya berfungsi menampilkan informasi saja berkenaan dengan proses yang telah dikaukan oleh delphi

Penggunaan MessageBox Messagedlg

Syntak Program :

if MessageDlg('Yakin anda akan keluar dari Aplikasi ini ?',

   mtConfirmation,[mbYes,mbNo],0)= mrYes then
       close;

Keterangan Program

• Jika Button Konfirmasi Di Klik maka akan tampil Pesan konfirmasi ‘Yakin akan keluar dari aplikasi ini’dengan 2 Pilihan Yakni Yes Dan No.
• Jika Yes Di Pilih maka aplikasi akan keluar (exit)
• JIka No maka tetap tidak akan exit.

Sitak diatas  merupakan message resultartinya jika ingin menggunakan statemen if diatas yang menggunakan message box dengan tombol yes no,maka untuk message result tombol yes,dalam delphi memakai angka 6. Berikut daftar tabelnya.

Tabel Result MessageBox

Penggunaan MessageBox Application.MessageBox

Penggunaannya hampir sama dengan MessageBox untuk menampilkan Kotak Dialog Pesan

Syntak :

application.MessageBox ('Usia Tidak Boleh Kosong..','Aplikasi',
  MB_OK+ MB_NOFOCUS + MB_ICONERROR);

 Selamat Mencoba.


PADEPOKAN IT COURSES
IT Tutorial, Training Center & IT Solution
www.padepokanit.com