Oppure

Loading
17/03/08 19:34
FrnbacYescO
Postato originariamente da .:ViRuS:.:

scusate se mi intrometto...ma non potrebbe fsre in modo da vedere tutti i processi attivi e se trova quello del gioco applica il timer?

:-|:-|:-|

io farei così

si infatti l'ho già fatto ma io spesso metto il gioco in background e quindi il tasto continua ad essere premuto

ps. non è un bot, è un programmino momentaneo che serve per evitare che x 5minuti che ti allontani dal pc ti kikkino....
aaa
17/03/08 19:40
allora imposta un intervallo al timer in modo da avere il tempo d mettere in primo piano il gioco...


spero di averti aiutato
Ultima modifica effettuata da 17/03/08 19:40
17/03/08 19:47
FrnbacYescO
si lo sò infatti il timer già c'è....
aaa
17/03/08 19:52
allora il problema è risolto no? O_o
17/03/08 21:07
FrnbacYescO
per metà XD ... vorrei ke si attivasse la pressione del tasto solo se è selezionata la finestra del gioco...
aaa
17/03/08 21:10
TheLizard
mmm
non ho mai fatto una cosa del genere, ma penso che devi prendere l'id della finestra in primo piano..
dovrebbe essere "semplicemente" questo..
aaa
17/03/08 21:17
Ecco la soluzione al tuo problema:

Option Explicit

Private Declare Function GetActiveWindow Lib "user32" () As Long
Private Declare Function GetWindowText Lib "user32" Alias "GetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String, ByVal cch As Long) As Long
Private Declare Function GetForegroundWindow Lib "user32" () As Long
__________________________________________________

Private Sub Timer1_Timer()
Dim foreground_hwnd As Long
Dim txt As String
Dim length As Long

    foreground_hwnd = GetForegroundWindow()

    txt = Space$(1024)
    length = GetWindowText(foreground_hwnd, txt, Len(txt))
    txt = Left$(txt, length)

    lblCaption = txt
    
    If txt = "Caption Finestra gioco" Then
    
    Timer1.Enabled = True

    end if
End Sub


se hai problemi cioè non sai qual'è la caption del gioco... allora leva l'if

e memorizza in una variabile a caption e la metti inuna textbox... così sapraiqual'è è la metti...


spero di essere stato chiao :)

SCUSATE GLI ERRORI ORTOGRAFICI MA NON SO PERCHè ALCUNI TASTI NON ME LI METTE O_o
Ultima modifica effettuata da 17/03/08 21:19
17/03/08 21:42
FrnbacYescO
provo subito e ti faccio saper ... grazie
aaa