Cara Membuat MessageBox Pada Pemrograman Delphi7

 Mau dong.. :D

Oke, karena tadi saya lihat pas ekskul banyak yang macet, jadi saya post nih. Langsung saja...

1. Buat dulu "Button" (Tombol, red), sesuaikan properties-nya (Name, Caption, Ukuran, dll) dengan selera masing-masing.
2. Double-click pada Button yang tadi dibuat hingga masuk ke "Code Editor" (Tempat dimana anda akan menulis Syntax).
3. Ketikkan "Application.MessageBox" pada Code Editor, tepatnya diantara tulisan "Begin" dan "End", pasti akan muncul buka dan tutup kurung secara otomatis.
4. Klik pointer diantara buka dan tutup kurung tadi.
5. Ketikkan isi MessageBox disana dengan menggunakan tanda petik (') sebelum dan sesudahnya.
6. Ketik koma setelah selesai mengetik isi MessageBox.
7. Ketikkan judul MessageBox dengan menggunakan tanda petik (') sebelum dan sesudahnya.
8. Ketik koma setelah selesai mengetik judul MessageBox.
9. Ketik "MB_" lalu tekan "Ctrl+Space" untuk membuat tombol pada MessageBox.
10. Ketik "or" setelahnya.
11. Ketik "MB_ICON" lalu tekan "Ctrl+Space" untuk membuat icon pada MessageBox.

Sebagai contoh, saya akan membuat syntax untuk MessageBox pada gambar diatas ::

procedure TForm1.Button1Click(Sender: TObject);
begin
  Application.MessageBox('Mau tau cara buat MessageBox di Delphi7?',
                         'Untuk anak CPLC', MB_YESNO or MB_ICONQUESTION);
end;

Ada pertanyaan??