Tutorial Pemrograman Delphi : Membuat Menu ber-Icon

Ini adalah tutorial singkat pemrograman Delphi untuk membuat menu dengan icon disampingnya. Sebagai contoh saya akan membuat menu dengan struktur menu seperti ini :

untuk membuat menu ber-Icon seperti diatas, inilah langkah-langkahnya :

• Buat Project Baru di Delphi


• Tambahkan komponen ActionManager , ActionMainMenuBar yang ada di tab Additional


• Tambahkan komponen ImageList yang ada di tab win32


• Dobel klik komponen ActionManager, akan muncul Form Editing ActionManager



• klik pada icon New Icon atau tekan tombol Insert pada keyboard untuk menambahkan sebuah Action


• Untuk merubah judul menu, klik sebuah Action kemudian rubah properties Caption pada Object Inspector.
  


• Untuk mengelompokan sebuah Action atau beberapa Action sekaligus kedalam sebuah menu : Klik Action tersebut, atau beberapa Action sekaligus kemudian rubah properties Category nya menjadi nama menu misalnya dalam contoh ini adalah "Master Data".


• Masukkan Icon yang akan digunakan kedalam komponen ImageList caranya : dobel klik komponen ImageList, pada dialog yang muncul klik tombol add. pilih file icon (*.ico) atau file bitmap image (*.bmp) yang akan kamu pergunakan sebagai icon disamping menu tersebut kemudian klik ok.


• Set properties Image komponen ActionManager menjadi ImageList1 untuk "memberitahu" komponen ActionManager bahwa kita akan menggunakan image yang ada padi komponen ImageList.
  


• Assign Icon untuk setiap menu caranya : dobel klik komponen ActionManager1, dibawah Listbox Categories pilih category yang telah kita buat tadi yaitu "Master Data" kemudian di Listbox sebelah kanan (Actions) klik sebuah Action, pada object inspector set properties ImageIndex menjadi index image yang ada di ImageList misalnya 0 (index dimulai dari 0).
  


• untuk menampilkan menu kedalam form caranya : dobel klik ActionManager1, drag and drop category "Master Data" kedalam komponen ActionMainMenuBar1.
  


• Run Aplikasi, disana terlihat bahwa menu belum aktif, untuk mengaktifkan menu kamu harus tambahkan kode program ke masing menu-menu tersebut. sebagai contoh kamu bisa tambahkan kode program berikut ke masing-masing menu tersebut :
  


messagedlg('Test Iconic Menu With ActionManager Component',mtinformation,[mbok],0);


Itulah tutorial dan Tips pemrogramman Delphi untuk membuat menu ber-icon, mudah-mudahan bisa bermanfaat.