EliteHackers
SALUT 2022!! NE-AM MUTAT PE DISCORD ! Vrei să inviți un prieten? [T]eoria [H]aosului [C]ontrolat - https://discord.com/invite/U4HBCHzm7r Acesta aste link-ul oficial al acestui server. 		Lista Forumurilor Pe Tematici
EliteHackers | Reguli | Inregistrare | Login

POZE ELITEHACKERS

Nu sunteti logat. 		Nou pe simpatie:
crazy_hell_angel pe Simpatie.ro
Femeie
25 ani
Gorj
cauta Barbat
25 - 53 ani
EliteHackers / Programare / [VB6] Semi-Transparent Form Moderat de Ad_Infinitum, AntiKiler, Puscas_marin, r3v
Autor
Mesaj Pagini: 1
Puscas_marin
Moderator

Inregistrat: acum 17 ani
Postari: 315
Add To Declarations:

Code:

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 crKey As Long, ByVal bAlpha As Byte, ByVal dwFlags As Long) As Long

This should be your Form_Load:

Code:

Private Sub Form_Load()
    SetWindowLong Me.hWnd, (-20), &H80000
    SetLayeredWindowAttributes Me.hWnd, 0, 200, &H2
End Sub



Modificat de Puscas_marin (acum 17 ani)

_______________________________________
Deci asa se fac banii....da clik sa vezi
pus acum 17 ani
   
Pagini: 1  

Mergi la