windows - AutoHotKey:具有多行输入的 InputBox

Question

在 AutoHotKey 中，我想要类似 InputBox 的东西，除了文本输入是多行的。 (即像一个文本区域)。

我希望有两个按钮，“确定”和“取消”，并且我希望它们都有加速器。我希望这段代码采用函数的形式，我可以随时从其他热键调用该函数以获取多行用户输入。我希望能够设置显示对话框时显示的默认文本。如果按下取消按钮，我希望函数返回 null 或空字符串。我希望 Esc 键关闭对话框，就像按下取消按钮一样(而不是退出整个脚本)。我希望对话框显示在屏幕中央，并使用 Windows 通常用于对话框的字体。

Answer 1

试试这个

!1::
MsgBox % MultiLineInputBox("Hello World:", "stuff, more stuff", "Custom Caption")
return<br/>
MultiLineInputBox(Text:="", Default:="", Caption:="Multi Line Input Box"){
    static
    ButtonOK:=ButtonCancel:= false
    if !MultiLineInputBoxGui{
        Gui, MultiLineInputBox: add, Text, r1 w600  , % Text
        Gui, MultiLineInputBox: add, Edit, r10 w600 vMultiLineInputBox, % Default
        Gui, MultiLineInputBox: add, Button, w60 gMultiLineInputBoxOK , &OK
        Gui, MultiLineInputBox: add, Button, w60 x+10 gMultiLineInputBoxCancel, &Cancel
        MultiLineInputBoxGui := true
    }
    GuiControl,MultiLineInputBox:, MultiLineInputBox, % Default
    Gui, MultiLineInputBox: Show,, % Caption
    SendMessage, 0xB1, 0, -1, Edit1, A
    while !(ButtonOK||ButtonCancel)
        continue
    if ButtonCancel
        return
    Gui, MultiLineInputBox: Submit, NoHide
    Gui, MultiLineInputBox: Cancel
    return MultiLineInputBox
    ;----------------------
    MultiLineInputBoxOK:
    ButtonOK:= true
    return
    ;---------------------- 
    MultiLineInputBoxGuiEscape:
    MultiLineInputBoxCancel:
    ButtonCancel:= true
    Gui, MultiLineInputBox: Cancel
    return
}