Context Menu Untuk File Ber-ektensi VBL - VB6 OCX

Masih ingatkah Anda? Ya, tentu saja. Masih ingatkah Anda dengan posting saya terdahulu tentang file yang ber-ektensi .VBL. Jika lupa coba Anda buka link di samping untuk mengingatnya klik disini. Apakah pada saat mencoba komponen Shadow.OCX menampilkan gambar di bawah ini:

Gambar: Lisensi tidak ditemukan untuk komponen shadow.ocx

Hal tersebut terjadi karena Anda tidak memiliki lisensi untuk menggunakan shadow.ocx pada saat design time dan hanya diperbolehkan melihat demonya saja. Sekarang kita bermain pura-pura, pura-puranya Anda telah membeli lisensi dari saya, kemudian saya memberikan lisensinya berupa file ber-ektensi .vbl atau tepatnya lisensi.vbl.
Download: Lisensi.VBL

Apa Yang Harus Dilakukan Dengan Lisensi.VBL

Memasukan lisensi key yang terdapat pada file lisensi.vbl ke dalam registry agar Anda dapat menggunakan file shadow.ocx tersebut pada saat design time, tetapi bagaimana caranya? Kita ambil dua cara termudah:

1. Mengganti ektensi .vbl dengan ektensi .reg kemudian double klik
2. Membuat context menu untuk file .vbl dengan cara mengetik file registry di bawah ini pada notepad:

REGEDIT4
[HKEY_CLASSES_ROOT\.vbl]
@="VisualBasic.VBLFile"
[HKEY_CLASSES_ROOT\VisualBasic.VBLFile]
@="Visual Basic Control License File"
[HKEY_CLASSES_ROOT\VisualBasic.VBLFile\shell\open]
@="&Insert License"

• Kemudian simpan dengan nama lisensi.reg lakukan double klik, selanjutnya akan ada konfirmasi sukses.
• Klik kanan file lisensi.vbl maka pada context menu akan terdapat menu Insert Lisensi seperti gambar di bawah ini:

• 

  Gambar: Context Menu Baru (Insert License)

• Selanjutnya apa lagi jika bukan klik!

Nah, setelah Anda paham maka kita hentikan kepura-puraannya.

Nama file: Shadow.OCX
GUID: A434183A-F9E0-4DFA-AB7B-7538C391A576
License Key: kkgdjdikddedddfdieikpdfkqesjgdjdkdpj

READ MORE - Context Menu Untuk File Ber-ektensi VBL - VB6 OCX

Visual Basic 6.0 - Beberapa Masalah File Manifest

Penggunaan file manifest untuk meng- Style XP-kan objek-objek Visual Basic 6.0 ternyata memiliki bebearapa masalah, diantaranya:

1. Hilangnya shortcut mnemonic (shortcut underlin/underscore) yang biasa diakses melalui Alt + ...
2. OptionButton dan CheckBox yang disimpan dalam kontainer Frame berubah berwarna hitam mengakibatkan Caption dari dua objek tersebut tidak dapat terbaca.
3. CommandButton yang property style-nya diset pada mode 1-Graphical tidak mau berubah menjadi Style XP.
4. MSCOMCTL.OCX TreeView, ToolBar, dsb tidak mau berubah menjadi Style XP.

Penyelesaian:

• Masalah ke-1: Simpan kode di bawah ini pada module, selanjutnya panggil pada setiap Event Form Load.
  

  Option Explicit 
  
  Private Const WM_CHANGEUISTATE As Long = &H127 
  Private Const UISF_HIDEFOCUS As Integer = &H1 
  Private Const  UISF_HIDEACCEL As Integer = &H2 
  Private Const UIS_CLEAR As Integer = &H2 
   
  Private Declare Function SendMessage Lib "user32" Alias "SendMessageA"  _ 
         ByVal hwnd As Long, _ 
         ByVal wMsg As Long, _ 
         ByVal wParam As Long, _ 
         lParam As Any) As Long 
  
  Public Sub ShowMnemonic(frm As Form) 
     Dim uiState As Long 
     uiState = MakeLong(UIS_CLEAR, UISF_HIDEFOCUS Or UISF_HIDEACCEL) 
     SendMessage frm.hwnd, WM_CHANGEUISTATE, uiState, ByVal 0 
  End Sub 
  
  Private Function MakeLong(ByVal wLow As Integer, ByVal wHigh As Integer) As Long 
     MakeLong = wHigh * &H10000 + wLow 
  End Function 

• Masalah ke-2: Jangan tempatkan OptionButton dan CheckBox secara langsung di atas Frame, tetapi simpanlah kedua objek tersebut di atas PictureBox, selanjutnya pindahkan PictureBox ini ke dalam Frame.
• Masalah ke-3: Mengenai permasalah ini Anda dapat mengunjugi situs Edanmo (Eduardo A. Morcillo).
• Masalah ke-4: Sudah diselesaikan disini.

READ MORE - Visual Basic 6.0 - Beberapa Masalah File Manifest

VB6 Code - Cara Menggunakan NotifyIcon.OCX

Artikel di bawah ini kami beri judul Cara Menggunakan NotifyIcon.OCX, Apa yang dimaksud dengan NotifyIcon? lihat screenshot di bawah ini
.
Nah, sekarang Anda faham, apa yang dimaksud dengan NotifyIcon itu. NotifyIcon.ocx dibuat oleh Bhagwat Singh. NotifyIcon.OCX merupakan sebuah ocx yang bagus, ia dapat mengurangi kekomplekan pemograman. Setidaknya kita tidak direpotkan dengan membuat sebuah modul untuk keperluan Icon Tray dan modul untuk keperluan Baloon Tips. Apa yang harus Anda lakukan adalah mengisi properties-propertiesnya saja, hanya itu saja. Sekarang, bagaimanakah cara mengisi properties-propertiesnya menggunakan pengkodean. Copy dan pastekan code di bawah ini, sebelumnya Anda tambahkan NotifyIcon.ocx ke dalam project Anda.

Option Explicit

Private Const VERSI_KAMUS As String = "Kamus Bahasa Arab v3.0"

Private Sub Form_Load()
 With NotifyIcon1
     .Tip = VERSI_KAMUS
     .BaloonIcon = BaloonIcon.Information
     .ShowIcon
     .BaloonTitle = VERSI_KAMUS
     .BaloonText = VERSI_KAMUS & " - Memudahkan pencarian kosakata bahasa arab dengan fasilitas Windows Pop-Up"
     .ShowBaloon
 End With
End Sub

Private Sub Form_Unload(Cancel As Integer)
 NotifyIcon1.DeleteIcon
End Sub

Catatan:
Kamus Bahasa Arab v1.0 s/d v3.0 (yang paling terakhir di release) seluruhnya menggunakan ocx ini.

READ MORE - VB6 Code - Cara Menggunakan NotifyIcon.OCX

VB6 Code - Beberapa Cara Meregister OCX dan DLL

Pernahkan Anda mendapat pesan error seperti di samping ini Lihat Gambar atau yang ini Lihat Gambar. Kira-kira mengapa? jawabannya mudah saja, karena dll atau ocx yang diperlukan program tidak teregister. Lalu bagaimana solusinya? Solusinya adalah dengan meregister komponen ocx atau dll yang diperlukan. Bagaimana caranya? nah ini dia inti dari pembicaraan, setidaknya ada beberapa cara meregister ocx dan dll diantaranya:

1. Dengan cara copy paste dll atau ocx tepat di atas file regsvr32.exe
2. Dengan membuat file .bat misalnya install.bat. Contoh: Regsvr32.exe notifyicon.ocx
3. Register komponen yang bersangkutan menggunakan software
4. Membuat shell context menu

Selesai. Sekarang program yang kita buat tidak akan menampilkan pesan error lagi, dan tentu saja siap untuk dijalankan.

READ MORE - VB6 Code - Beberapa Cara Meregister OCX dan DLL