Window On Top

[virus7799]

Im trying to set my Hack Window so it's always on top.

Private Declare Function SetWindowPos& Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long)

Private Sub check1_click()
If Check1.Value = 1 Then rtn = SetWindowPos&(Form1.hwnd, -1, 0, 0, 0, 0, 3) Else rtn = SetWindowPos&(Form1.hwnd, -2, 0, 0, 0, 0, 3)
End Sub

Do I put this code in my Module?:confused::confused:

[DutchHelFire]

this at api declaration
Private Declare Function SetWindowPos& Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long)

this at ur checkbox
If Check1.Value = 1 Then rtn = SetWindowPos&(Form1.hwnd, -1, 0, 0, 0, 0, 3) Else rtn = SetWindowPos&(Form1.hwnd, -2, 0, 0, 0, 0, 3)

i think so didnt code vb6 for a long time

[Runubunu0]

thnx, could u make a tutorial for me? how to make an invisible background on VB 6.0 and things like that. something like a D3D