Hotstring

检索或修改全局设置, 该设置控制鼠标单击是否重置热字串识别器, 如这里所描述的那样.

NewValue 为 1(true) 以启用鼠标点击检测和重置热字串识别器, 或者 0(false) 来禁用. 返回值是在调用函数之前生效的设置.

#Hotstring NoMouse 也会影响此设置, 等同于将 NewValue 指定为 false.

Reset

换句话说, 脚本将开始等待一个全新热字串, 不再考虑之前键入的任何内容.

错误

如果省略了 Replacement 并且 String 有效但无法匹配到一个存在的热字串, 则也会抛出异常. 这可以用来测试热字串的存在. 例如:

备注

如果该脚本被挂起, 新添加/启用的热字串也将挂起, 直到挂起关闭(Suspend 页面中所描述的豁免除外).

如果此函数所做的更改有需要, 将安装或删除键盘和/或鼠标钩子.

一旦脚本具有至少一个热字符串, 它将成为持续运行的脚本, 这意味着应该使用 ExitApp 而不是 Exit 来退出(终止) 脚本.

变体(副本) 热字串

一个特定的热字符串可以创建多次, 如果每个定义具有不同的 HotIf 条件, 区分大小写(C vs. C0/C1), 或单词敏感性(?). 这些被称为 热字串变体. 例如:

如果一个热字串的多个变体能被触发, 那么只有最早创建的将会触发.

相关

示例

热字串助手. 如果您是一个热字串重度用户, 下面的脚本可能会很有用. 它基于 Andreas Borutta 创建的 v1 脚本. 通过按下 Win+H(或您选择的其他热键), 可以将当前选定的文本转换为热字串. 例如, 如果您在文字处理软件中选择了 "by the way", 按下 Win+H 会提示您输入其缩写(例如 btw), 然后将新热字串添加到脚本中并启用它.

#h::  ; Win+H 热键
{
     获取当前选择的文本. 使用剪贴板代替
    ; EditGetSelectedText 是因为它可以工作于更大范围的编辑器
    ; (即文字处理软件).  保存剪贴板当前的内容
    ; 以便在后面恢复. 尽管只能处理纯文本,
    ; 但总比没有好:
    ClipboardOld := A_Clipboard
    A_Clipboard := "" ; 必须清空, 才能检测是否有效.
    Send "^c"
    if !ClipWait(1)  ; ClipWait 超时.
    {
        A_Clipboard := ClipboardOld ; 恢复剪贴板之前的内容.
        return
    }

    ; 替换 CRLF 和/或 LF 为 `n 以便用于 "send-raw" 热字串:
    ; 对其他任何在原始模式下可能出现问题
    ; 的字符进行相同的处理:
    ClipContent := StrReplace(A_Clipboard, "``", "````")  ; 首先进行此替换以避免和后面的操作冲突.
    ClipContent := StrReplace(ClipContent, "`r`n", "``n")
    ClipContent := StrReplace(ClipContent, "`n", "``n")
    ClipContent := StrReplace(ClipContent, "`t", "``t")
    ClipContent := StrReplace(ClipContent, "`;", "```;")
    A_Clipboard := ClipboardOld  ; 恢复剪贴板之前的内容.
    ShowInputBox(":T:`::" ClipContent)
}

ShowInputBox(DefaultValue)
{
    ; 这里会移动输入框的光标到更人性化的位置:
    SetTimer MoveCaret, 10
    ; 显示输入框, 提供默认的热字串:
    IB := InputBox("
    (
    Type your abreviation at the indicated insertion point. You can also edit the replacement text if you wish.

    Example entry: :T:btw`::by the way
    )", "New Hotstring",, DefaultValue)
    if IB.Result = "Cancel"  ; 用户选择了取消.
        return

    if RegExMatch(IB.Value, "(?P<Label>:.*?:(?P<Abbreviation>.*?))::(?P<Replacement>.*)", &Entered)
    {
        if !Entered.Abbreviation
            MsgText := "You didn't provide an abbreviation"
        else if !Entered.Replacement
            MsgText := "You didn't provide a replacement"
        else
        {
            Hotstring Entered.Label, Entered.Replacement  ; 现在激活热字串.
            FileAppend "`n" IB.Value, A_ScriptFullPath  ; 保存热字串以备以后使用.
        }
    }
    else
        MsgText := "The hotstring appears to be improperly formatted"

    if IsSet(MsgText)
    {
        Result := MsgBox(MsgText ". Would you like to try again?",, 4)
        if Result = "Yes"
            ShowInputBox(DefaultValue)
    }
    
    MoveCaret()
    {
        WinWait "New Hotstring"
        ; 否则移动输入框中的光标到用户输入缩写的位置.
        Send "{Home}{Right 3}"
        SetTimer, 0
    }
}

参数

子函数

EndChars

MouseReset

Reset

错误

备注

变体(副本) 热字串

示例