Pada bagian ke-9 ini kita akan menambahkan modul form center dan module registry. Module form center berguna untuk menyimpan form di tengah layar, dalam hal ini kita akan menggunakan advance form center. Diberi kata advance, karena ia memiliki beberapa keistimewaan, yaitu:
- Menampilkan form di tengah layar hanya untuk pertama kali saja,
- Pada kali kedua ditampilkan dan seterusnya, posisi form akan diambil dari nilai yang terdapat pada registry
- Tidak terpengaruh oleh tingginya taskbar, sehingga ia akan berada benar-benar di tengah layar.
Tujuan pada Bagian ke-9
- Menambahkan modul form center agar aplikasi ditampilkan tepat di tengah layar.
- Menambahkan modul registry untuk keperluan setting/konfigurasi, dan opsi.
- Buatlah modul baru dan beri nama modForm, copy dan pastekan kode ini.
- Buatlah modul baru dan beri nama modRegistry, copy dan pastekan kode ini.
Gantilah kode di bawah ini (terdapat pada frmMain):
Private Sub Form_Load()Sehingga menjadi:
BukaData App.Path & "\database\en-id.txt", List2
End Sub
Private Sub Form_Load()Tambahkan kode di bawah ini pada frmMain:
GetPositionsFromRegistry Me 'ini untuk posisi form yang diambil dari registry
BukaData App.Path & "\database\en-id.txt", List2
End Sub
Private Sub Form_Unload(Cancel As Integer)Uji Coba
SavePositionsInRegistry Me ' menyimpan posisi ke dalam registry
End Sub
- Compile terlebih dahulul projectnya, Jalankan melalui Windows Explorer. Pada saat pertama kali dijalankan aplikasi akan berada tepat di tengah layar. Selanjutnya geser (drag) aplikasi kamus dan tutuplah, buka kembali, maka sekarang ia akan tampil seperti pada posisi terakhir kali ia ditutup.