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 :

application menu structure

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

  • Buat Project Baru di Delphi
  • Tambahkan komponen ActionManager Delphi ActionManager Component Icon, ActionMainMenuBar Delphi ActionMainMenuBar component yang ada di tab Additional
  • Tambahkan komponen ImageList delphi imagelist component icon yang ada di tab win32
  • Dobel klik komponen ActionManager, akan muncul Form Editing ActionManager
    • editing Actionmanager
  • klik pada icon New Icon NewAction 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.
sumber:http://easycomputertutorial.blogspot.com

Komentar

Posting Komentar

Postingan populer dari blog ini

Memperbaiki Flashdisk Tidak bisa di Copy

Gambar
Memperbaiki Flashdisk yang rusak tanpa sebab dengan langkah - langkah sebagai berikut. Cara Memperbaiki Flashdisk Yang Tidak Terdeteksi / Terbaca Komputer - Kali ini saya akan memberikan sebuah cara yang dapat digunakan Cara Memperbaiki Flashdisk yang Tidak Bisa Diformat - Mempunyai flashdisk yang rusak memang sangat menjengkelka Langkah-langkah dalam memperbaiki flashdisk yang tidak bisa diformat : 1. Masukkan dulu flashdisk ke dalam USB port yang ada di CPU. 2 Memperbaiki Flashdisk tips memperbaiki flashdisk rusak memperbaiki flashdisk yang tidak terdeteksi di komputer memperbaiki flashdisk yang tidak bisa diformat software memperbaiki flashdisk yang rusak memperbaiki flashdisk 0 byte memperbaiki flashdisk yang tidak terbaca cara memperbaiki flashdisk aplikasi format flashdisk  Memperbaki Flash disk Memperbaki Flash disk yang datanya tidak bisa di Copy ke Komputer atau tidak bisa Mengcopy data dari Komputer ke Flashdisk ? atau tidak dapat membuang file a
Baca selengkapnya

Cara mudah setting DHCP server di Mikrotik

Cara mudah setting DHCP server di Mikrotik Cara mudah setting DHCP server di krotik menggunakan langkah langkah seprti dibawah ini. Tentunya kita sudha paham apa itu IP Address. Karena ada beberapa IP yang akan diberikan ke klien maka Anda harus menentukan IP Range terlebih dahulu. Misalnya IP rangenya dari 192.168.0.10 sampai dengan 192.168.0.254 Diawali dengan membuat IP range dengan IP pool, langkahnya sebagai berikut : 1. Membuat address pool dan menentukan IP Range 2. Mengaktifkan DHCP server. Sebagai gambaran kita mempunyai 2 interface, Interface satu WAN / INTERNET sedangkan yang satunya lokal. Untuk melihat interface yang ada pada Mikrotik Router kita bisa menggunakan perintah sebagai berikut : [admin@Mikrotik] > interface print Flags: X – disabled, D – dynamic, R – running # NAME TYPE RX-RATE TX-RATE MTU 0 R ether1 ether 0 0 1500 1 R ether2 ether 0 0 1500[admin@Mikrotik] > kemudian set IP address pada interface Mikrotik. Misalkan ether1 akan kita gunaka
Baca selengkapnya

Langkah Mereset error ink cartridges are not installed properly (error E5)

Langkah Mereset error ink cartridges are not installed properly (error E5) 1 : Push Power switch by continue (Tekan Power On/Off) 2 : inserrt plug(Masukan Power, Power Tetap di Tekan) 3 : Tekan Tombol Reset 1x, lepaskan Tombol Pwr, Tekan Reset dua kali lagi Sampai Menjadi 0 (tekan tombol tanpa jeda) 4 : Push + display change from 0 to 1 (tekan tombol + untuk merubah 0 ke 1) 5 : Push Power switch again , Printer will be print 1 page(tekan tombol power ?> tombol start sampai ngeprint 1 hal.) 6: Open cover (buka tutup printer) 7 : Unplug (cabut kabel power) 8 : Take out ink 40 and 41(lepaskan catridge 40 dan 41) 9 : Insert plug again (pasang kabel power) 10 : Push power switch (tekan tombol power) 11 : Open cover (scan cover) (buka tutup scaner) 12 : Inksert ink 40 , 41 again (masukan catridge 40 dan 41). waduh kunyuk jelek?harap-harap bisa berhasil dengan gemilang ternyata proses reset hanya sampai di step 4..lengkap sudah penderitaanku..akhirnya aku berkesimpulan t
Baca selengkapnya