请问剪贴板操作怎么工作不正常啊？--已解决

nix

代码如下

Func hh_bold( )
        If WinActive("[class:PP11FrameClass]") Or WinActive("[class:OpusApp]") Then
        BlockInput(1)
        MouseClick("left")
        MouseClick("left")
        $hh_error=WinWaitActive("[class:EQNWINCLASS]","",3)
        if $hh_error=0 Then
                BlockInput(0)
                MsgBox(16, "出错啦", "没能激活窗口", 1)
                return 0
        EndIf
        Send("^a")
        Sleep(100)
        Send("^x")
        Sleep(300)
        Send("^v")
        Sleep(500)
        WinClose("[class:EQNWINCLASS]")
        sleep(100)
        BlockInput(0)
        Return 1
        Else
        MsgBox(16,"出错啦", "没找到窗口",1)
        Return 0
        EndIf
EndFunc

工作时好像根本没有剪切到剪贴板，粘贴也根本不成功。
此处剪切的不是普通文本，是ppt里面的公式编辑器里面的内容。
本人初学，莫笑哦

nix

工作流程是简单的全选、剪切、粘贴。
我用ahk完成了一个，能正常工作。autoit3不工作实在费解啊

现贴上ahk的代码

#b::
if WinActive("ahk_class PP11FrameClass") or WinActive("ahk_class OpusApp")
{
        BlockInput On
        Clipboard=
        click 2
        WinWaitActive,ahk_class EQNWINCLASS,,2
        if ErrorLevel
        {
            BlockInput Off
                MsgBox,0,出错啦, 超时2s,2
            return
        }
        sendinput ^a
        sleep 100
        sendinput ^x
        ClipWait,2,1
        if ErrorLevel
        {
            BlockInput Off
                MsgBox,1, 尝试复制到剪贴板失败,,出错啦,2
            return
        }
        sleep 200
        sendinput ^v
        Clipboard=
        sleep 1200
        WinClose, ahk_class EQNWINCLASS
        sleep 100
}
else 
{
        BlockInput Off
        MsgBox,0,出错啦, 没找到程序窗口^_^,2
}
BlockInput Off
return

baikaifang

不要使用 BlockInput 函数屏蔽键盘，再试试可不可以

nix

不要使用 BlockInput 函数屏蔽键盘，再试试可不可以
baikaifang 发表于 2010-9-20 10:21

多谢！。
果然如此，测试成功了。这个问题困扰我好久，看样子还得好好学学autoit3

zjg2003

学习了！！！！

afan

希望规范标题，改为“已解决”
“已经解决”和“未解决”在搜索时匹配“已解决”的关键字时命中率一样~
比如LZ的帖子在使用“剪贴板 已解决”搜索时是找不到的