• Home
 · 
• Miscellaneous
 · 
• Gets the 'secret' words behind the **** asterisk.

Gets the 'secret' words behind the **** asterisk.

Gets the 'secret' words behind the **** asterisk.

API Declarations


'go get this bas...makes this stuff easier and no bull from non bas files.
'http://www.crosswinds.net/~thenewreign2/



Rate Gets the 'secret' words behind the **** asterisk.

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

'Make a cammand button...name it Command1
'This is for copy cats such as gates.
'It's ok to use your own code but copying and stealing don't mix.

Private Sub Command1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
MousePointer = 10
End Sub

Private Sub Command1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
MousePointer = 0
GetCursorPos pnt
yhwnd% = WindowFromPoint(pnt.X, pnt.Y)
Text1 = GetCaption(yhwnd%)
End Sub