问从AutoHotKey脚本获取Windows上空文本的复制/粘贴

EN

ClipSaved := ClipboardAll
Clipboard =     ; empties the clipboard
Send ^+{Left}   ;  I just used highlight left to select text, you can replace this with
             ; whatever your program uses to select an input.
Send ^c         ; attempt to copy text
If Clipboard =  ;  checks to see if clipboard is empty
{
    break  ; Put what you want to do if the clipboard is empty, I used break to stop a loop
}
Clipboard := ClipSaved  ; puts the original clipboard contents back

If v =
    MsgBox v = ""

If (v = "")
    MsgBox v = ""

ClipSaved := ClipboardAll   ; Save the entire clipboard to a variable of your choice.
    ;... here make temporary use of the clipboard, such as for pasting Unicode text via    Transform Unicode ...
Clipboard := ClipSaved   ; Restore the original clipboard. Note the use of Clipboard    (not ClipboardAll).
ClipSaved =   ; Free the memory in case the clipboard was very large.

clipped_text :=
clip_empty := false
ClipSaved =
is_clipped := false

clip_speed := 0.15

Clip() {
    global ClipSaved
    global clip_empty
    global clipped_text
    global is_clipped
    global clip_speed

    if (!is_clipped) {
        ClipSaved := ClipboardAll   ; Save the entire clipboard to a variable of your choice.
        ; msgbox % ClipSaved
        is_clipped := true
    }

    clipboard = ; Empty the clipboard

    Send ^{c}
    ClipWait clip_speed

    if (ErrorLevel = 1)
    {
        clip_empty := false
    }
    else
    {
        clip_empty := true
        clipped_text := clipboard
    }
}

IsTextSelected() {
    global ClipSaved
    global clip_empty
    global clipped_text

    if (clip_empty == true) {
        return true
    }
    else {
        return false
    }
}

UnClip() {
    global ClipSaved
    global clip_empty
    global clipped_text
    global is_clipped

    is_clipped := false
    Clipboard := ClipSaved
    ClipSaved =
}

~^c::
msgbox, % "Clipboard Changed even if you didnt copy anything"
        . "(...not really but you tried at least)"
return