Membuat Menu Navigasi dengan Alpha Skin di Delphi
Pada Postingan Sebelumnya Sudah saya jelaskan Bagaimana membuat menu
Navigasi Samping dengan menggunakan component delphi Pihak ketiga yaitu
DevExpress.
Kali ini saya akan sharing bagaimana membuat menu Accordion (Navigasi
Samping) Seperti gambar diatas dengan menggunakan component Alpha Skin. Caranya Cukup mudah. Pertama, Silahkan Download component Alpha Skin delphi pada postingan yang ada disini kemudian install. Jika Sudah beres, Lanjutkan membaca. ;)
1. Tambahkan Beberapa komponen berikut pada form anda Secara berurutan
- 1 Buah Panel -> Property -> Align = alTop, Caption = Terserah
- 1 Buah StatusBar -> Klik 2 kali -> Tambahkan 2 Panel dan atur Teksnya
- 1 Buah sFrameBar (Pallete Alpha Additonal) -> Property -> Align = alLeft
- 1 Buah Panel -> Property -> Align = alClient, Caption = Kosong
- 1 Buah ImageList -> Klik 2 Kali -> Add Beberapa Icon
Proses Selanjutnya adalah (bagian yang paling penting).
Klik 1 Kali Pada sFramebar yang sudah anda tambahkan pada form anda kemudian atur Property -> Images = ImageList1
Klik 2 Kali Pada sFramebar yang sudah anda tambahkan pada Form anda
kemudian tambahkan beberapa Item dan Seperti gambar begikut.
Pada Masing-masing item dari gambar diatas, atur Property sebagai
berikut. Lakukan Secara Berurutan mulai dari yang paling atas.
Caption = Menu Satu
ImageIndex = Mulai dari Nol (Lihat Daftar Icon yang ada di ImageList)
Sampai disini, Hasil Sementara Seperti gambar berikut :
Tahap Selanjutnya, Karena Pada Poses ini kita membuat Lima Menu Pada
sFramebar, Maka Tambahkan Lima buah Frame ke Projek Anda (File -> New
-> Frame).
Pada Masing-Masing Frame yang sudah anda tambahkan, Atur Ukurannya Sesuai Keinginan anda lalu Tambahkan Pula Beberapa Button atau BitButton.
Klik 2 Kali Pada sFrameBar tadi. Pada Masing-Masing Item -> Event -> OnCreateFrame Tambahkan kode berikut Frame :=TFrame1.Create(nil); Lakukan secara berurutan mulai dari Item Paling atas.
Untuk Hasil Akhirnya, Silahkan Download disini. Selamat Mencoba dan Salam Sukses Selalu. :)
0 komentar:
Posting Komentar