Setelah kemarin membahas fake login , sekarang kita mencoba untuk membuat form terlihat transparant . Langsung aja kita isi perutnya hihi ..
• Siapkan alat dan bahan terlebih dahulu
• 1 Buah Form
• Sekarang , masukkan code berikut kedalam form :
Option Explicit
Private Const WS_EX_LAYERED = &H80000
Private Const GWL_EXSTYLE = (-20)
Private Const LWA_COLORKEY = &H1
Private Const LWA_ALPHA = &H2
Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) As Long
Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Private Declare Function SetLayeredWindowAttributes Lib "user32" (ByVal hwnd As Long, ByVal crColor As Long, ByVal nAlpha As Byte, ByVal dwFlags As Long) As Long
Private Sub Form_Load()
Call SetWindowLong(Me.hwnd, GWL_EXSTYLE, GetWindowLong(Me.hwnd, GWL_EXSTYLE) Or WS_EX_LAYERED)
Call SetLayeredWindowAttributes(Me.hwnd, RGB(255, 0, 255), 128, LWA_ALPHA Or LWA_COLORKEY)
End Sub
NB : (255, 0, 255), 128 untuk mengatur ketebalan transparant , bisa anda edit sendiri
0 Komentar:
Post a Comment
Terima Kasih atas kunjungan anda, merupakan suatu kehormatan bagi kami. Silahkan berikan komentar anda sesuai dengan aturan yang tercantum di bawah, Insya Allah akan kami tanggapi.
Aturan Berkomentar :
1. Komentar yang mengandung SPAM, pornografi dan iklan akan dihapus.
2. Mencantumkan link hidup akan otomatis dihapus.
3. Anda bisa mendapatkan back link dengan berkomentar sebagai Nama/URL.
4. Komentar dari Anonymous dianggap spam dan tidak akan di tanggapi.
5. Gunakan bahasa yang baku
6. Saya akan secepatnya menjawab komentar yang sifatnya pertanyaan
7. Berkomentarlah yang baik dan sesuai dengan pembahasan
Khusus untuk membalas komentar disarankan menggunakan tombol balas di samping komentar terkait dibandingkan menggunakan formulir komentar di bawah agar komunikasi lebih terstruktur. Karena mungkin, apa yang Anda tanyakan/katakan saat ini akan sangat bermanfaat bagi pembaca lain.
NB: Jangan menuliskan link aktif karena akan terhapus secara automatis.