Cara Membuat File ActiveX OCX di VB6 - ActiveX adalah file berisi program kecil yang bisa dipakai oleh orang lain, sehingga orang lain tidak perlu menuliskan kodenya. Cara pembuatan File ActiveX atau OCX tidak jauh berbeda dengan pembuatan Aplikasi biasa yang berstandar EXE. File ActiveX merupakan program yang bisa dipakai pada project yang lain tanpa harus menuliskan bahasa pemrograman lagi, jadi file ActiveX dibuat bila bagian tersebut akan dipakai pada project yang lain. Sebagai contoh, saya akan membuat sebuah file ActiveX untuk melihat file pada drectroy tertentu.
Bagi Anda yang penasaran bagaimana cara membuatnya langsung aja ke TKP dibawah ini :
1. Buka Program VB6 Anda
2. Pilih ActivexControl (bukan Standar EXE)
3. Setelah itu akan muncul Form UserControl1
4. Letakan 1 DriveListBox,1 DirListBox dan 1 FileListBox di dalam Form UserControl1
5. Pada Properties TolboxBitmap pilih gambar Anda, agar file ocx Anda mudah dikenali dengan
gambar icon Anda
6. Desainlah seperti gambar dibawah ini :
 |
| Form Desain UserControl |
7. Setelah itu ketik kode dibawah ini di jendela kode Usercontrol1
Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub
Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
End Sub
Private Sub UserControl_Initialize()
On Error Resume Next
Drive1.Width = UserControl.Width - 200
Drive1.Top = 0
Drive1.Left = 0
Dir1.Width = Drive1.Width
Dir1.Left = 0
Dir1.Top = Drive1.Height
File1.Width = Drive1.Width
File1.Left = 0
File1.Top = Drive1.Height + Dir1.Height
File1.Height = UserControl.Height - (Drive1.Height + Dir1.Height + 5200)
End Sub
Private Sub UserControl_Resize()
On Error Resume Next
Drive1.Width = UserControl.Width - 200
Drive1.Top = 0
Drive1.Left = 0
Dir1.Width = Drive1.Width
Dir1.Left = 0
Dir1.Top = Drive1.Height
File1.Width = Drive1.Width
File1.Left = 0
File1.Top = Drive1.Height + Dir1.Height
File1.Height = UserControl.Height - (Drive1.Height + Dir1.Height + 5200)
End Sub
8. Kemudian simpan hasil pekerjaan Anda.
9. Langkah sselanjutnya pilih File >> Make namaProjectAnda.Exe.......
10. Letakan Lokasi penyimpanan File Ocx yang Anda inginkan.
Sekarang Anda sudah mempunyai file ocx sendiri.
Menerapkan File OCX:
Agar file ocx Anda bisa jalankan dengan baik dan dapat di tambahkan di Control Toolbox maka file tersebut harus Anda daftarkan dulu dengan cara :
- Copy file ocx yang Anda simpan tadi dan Paste ke Windows >> System32
- Setelah itu daftarkan dengan cara klik Star >> Run >>ketik Regsvr.exe fileocxanda.ocx >> Ok
Menjalankan File OCX :
- Buka Project Baru pilih Standar EXE
- Tekan CTRL+T kemudian tekan Browse cari nama File Project OCX Anda yang ada di Windows System32 >> Ok .
- Setelah itu Ceklist tekan Ok, kemudian akan terlihat File ocx Anda di toolbox
- Kemudian Tanamkan di form Anda.
- Atur File ocx Anda agar sesuai dan terlihat semua, kemudian jalankan Program
- Setelah berhasil Anda menjalankannya buka salah satu Drive kepunyaan Anda dengan Doubel Klik (Klik Ganda).
Demikian tip cara Cara Membuat File ActiveX OCX di VB6. Selasai sudah cara membuat File Ocx ActiveX. Selamat mencoba, semoga berhasil.
No comments:
Post a Comment