hotkey("^v", "Paste")

[232showtime]

I tried this this script and it kept sending the details I copied

expandcollapse popup

#include <MsgBoxConstants.au3>
ToolTip('Script is "Running"', 0, 0)
Global $fPaused = False
HotKeySet("^v", "Paste");1st option, keeps on sending the copied details even if I did not press hotkey

Func Paste()
Local $1 = WinWaitActive("[CLASS:TFrmSpec]")

If $1 then
ControlSend($1, "", "TDBEdit1", "^v")
Endif

Endfunc; forgot to put this


While 1 ;2nd option

    If _IsPressed('11') = 1 Then
        ControlClick("Title", "", "[CLASS:TDBEdit; INSTANCE:1]")
        Send("^v"); keeps on sending the copied details even if I did not press 11
    EndIf
wend

Func _IsPressed($hexKey)

   Local $aR, $bO

    $hexKey = '0x' & $hexKey
    $aR = DllCall("user32", "int", "GetAsyncKeyState", "int", $hexKey)
    If Not @error And BitAND($aR[0], 0x8000) = 0x8000 Then
        $bO = 1
    Else
        $bO = 0
    EndIf

    Return $bO
EndFunc   ;==>_IsPressed

what am I doing wrong?

EDIT: forgot to put endfunc. but its working fine the problem is, it keeps sending data that i copied, to the edit box, if windows is active. I did not even press the hotkey. you can try it to other edit box

Edited July 24, 2014 by 232showtime

[Exit]

Endfunc missing at line 9

[careca]

example not working here, had to add:

#include <Misc.au3>
 Local $vDLL = 'user32.dll'

And gives syntax error at:

Func _IsPressed($hexKey)