1

Тема: AHK: Копирование уже выделенного текста из "ComboBox"

Доброго времени суток.Подскажите код скрипта на копирование уже выделенного текста из элемента управления "ComboBox" по горячей клавише

#SingleInstance force
#NoEnv
#Persistent
#NoEnv
SetBatchLines, -1

#MaxHotkeysPerInterval
#HotkeyInterval, -1

Gui, Color, E0E0E0
gui, font, cBlue s20
Gui, Font, underline
Gui, Add, Text,,  Список команд
Gui, Font, norm
Gui, Add, ComboBox, vclipboard w250,
|AutoTrim    
|BlockInput    
|Break    
|ClipWait    
|Continue    
|Control    
|ControlFocus    
|ControlGetFocus    
|ControlGetPos    
|ControlGetText    
|ControlMove    
|ControlSendRaw    
|ControlSetText    
|CoordMode    
|Critical    
|DetectHiddenWindows    
|Drive    
|DriveGet    
|DriveSpaceFree    
|Else    
|EnvAdd    
|EnvMult    
|EnvSet    
|EnvSub    
|Exit    
|ExitApp    
|FileCopy    
|FileCopyDir    
|FileCreateDir    
|FileCreateShortcut    
|FileDelete    
|FileInstall
|FileGetAttrib    
|FileGetShortcut    
|FileGetSize    
|FileGetTime    
|FileGetVersion    
|FileMove    
|FileMoveDir    
|FileRead    
|FileReadLine    
|FileRecycle    
|FileRecycleEmpty    
|FileRemoveDir    
|FileSelectFile    
|FileSelectFolder    
|FileSetAttrib    
|FileSetTime    
|FormatTime    
|GetKeyState    
|Gosub    
|Goto
|GroupActivate    
|GroupAdd    
|GroupClose    
|GroupDeactivate    
|GUI    
|GuiControl    
|GuiControlGet    
|HideAutoItWin, On|Off    
|Hotkey    
|if    
|if (expression)    
|If var [not] between    
|If var [not] in/contains MatchList    
|If var is [not] type    
|IfEqual/IfNotEqual    
|IfExist
|FileExist()
|IfGreater
|IfGreaterOrEqual    
|IfInString
|InStr()    
|IfLess
|IfLessOrEqual    
|IfMsgBox
|IfWinActive
|IfWinNotActive    
|IfWinExist
|IfWinNotExist    
|ImageSearch    
|IniDelete    
|IniRead    
|IniWrite    
|Input    
|InputBox    
|KeyHistory    
|KeyWait    
|LeftClick    
|LeftClickDrag    
|ListHotkeys    
|ListLines    
|ListVars    
|Loop (normal)    
|Loop (files & folders)    
|Loop (parse a string)    
|Loop (read file contents)
|Loop (registry)    
|Menu    
|MouseClick    
|MouseClickDrag    
|MouseGetPos    
|MouseMove    
|MsgBox    
|OnExit    
|OnMessage()    
|OutputDebug    
|Pause    
|PixelGetColor    
|PixelSearch    
|PostMessage    
|Process    
|Progress    
|Random    
|RegDelete    
|RegRead    
|RegWrite    
|Reload    
|Repeat…EndRepeat
|Return
|RightClick    
|RightClickDrag    
|Run    
|RunAs    
|RunWait    
|Send
|SendRaw    
|SendMessage    
|SetBatchLines    
|SetCapslockState    
|SetControlDelay    
|SetDefaultMouseSpeed    
|SetFormat    
|SetKeyDelay    
|SetMouseDelay    
|SetNumlockState    
|SetScrollLockState    
|SetStoreCapslockMode    
|SetTimer    
|SetTitleMatchMode    
|SetWinDelay    
|SetWorkingDir    
|Shutdown    
|Sleep    
|Sort
|SoundBeep    
|SoundGet    
|SoundGetWaveVolume    
|SoundPlay    
|SoundSet    
|SoundSetWaveVolume    
|SplashImage    
|SplashTextOn    
|SplashTextOff    
|SplitPath    
|StatusBarGetText    
|StatusBarWait    
|StringCaseSense    
|StringGetPos    
|StringLeft
|StringLen
|StrLen()    
|StringLower    
|StringMid
|StringReplace    
|StringRight    
|StringSplit    
|StringTrimLeft    
|StringTrimRight    
|StringUpper    
|Suspend    
|SysGet    
|Thread    
|ToolTip    
|Transform    
|TrayTip    
|URLDownloadToFile    
|Var = value    
|Var := expression    
|VarSetCapacity()    
|WinActivate    
|WinActivateBottom    
|WinClose    
|WinGetActiveStats    
|WinGetActiveTitle    
|WinGetClass    
|WinGet    
|WinGetPos    
|WinGetText    
|WinGetTitle    
|WinHide    
|WinKill    
|WinMaximize    
|WinMenuSelectItem    
|WinMinimize    
|WinMinimizeAll    
|WinMinimizeAllUndo    
|WinMove    
|WinRestore    
|WinSet    
|WinSetTitle    
|WinShow    
|WinWait    
|WinWaitActive    
|WinWaitClose    
|WinWaitNotActive|
Gui, Font, underline
Gui, Show
Return

~vk79::
Suspend, Off
ExitApp
Process, Close, No ReKoiL.exe
Return

~Lbutton::
Clipboard = ; Буфер обмена пуст
clipboard = %A_ThisGuiComboBox%
Return
ComboBox:
Return
GuiClose:
ExitApp
OS: Win11x64, AutoHotkey v1.1.25.01 (Unicode 64-bit).

2

Re: AHK: Копирование уже выделенного текста из "ComboBox"

может кому пригодиться

#SingleInstance force
#NoEnv
#Persistent
#NoEnv
SetBatchLines, -1

#MaxHotkeysPerInterval
#HotkeyInterval, -1

Gui, Color, E0E0E0
gui, font, cBlue s12
Gui, Font, underline
Gui, Add, Text,, Команды мыши
Gui, Font, norm
Gui, Add, ComboBox, vText w250,
|*
|$
|~
|{ }
|&
|@
|#
|Loop
|Break
|Menu
|GetKeyState
|Send
|SendRaw    
|SendMessage    
|Input    
|KeyWait    
|SetKeyDelay
|SetTimer    
|Sleep
|Pause
|Suspend
|Reload    
|Return
|LButton 
|RButton 
|MButton
|WheelDown 
|WheelUp 
|XButton1 
|XButton2
|Up
|Down
|Left
|Right
|LeftClick
|LeftClickDrag    
|RightClick    
|RightClickDrag
|MouseClick    
|MouseClickDrag    
|MouseGetPos    
|MouseMove
|SetMouseDelay
|SetControlDelay    
|SetDefaultMouseSpeed    
|SetTitleMatchMode
|SetBatchLines    
|SetWinDelay    
|SetWorkingDir    
|Shutdown
|ToolTip    
|TrayTip
|SoundBeep    
|Process    
|PixelGetColor    
|PixelSearch    
|PostMessage    
|Run    
|RunAs    
|RunWait    
|Exit    
|ExitApp|

Gui, Font, underline
Gui, Add, Text,,  Список команд
Gui, Font, norm
Gui, Add, ComboBox, vText1 w250,
|DetectHiddenWindows    
|WinActivate    
|WinActivateBottom    
|WinClose    
|WinGetActiveStats    
|WinGetActiveTitle    
|WinGetClass    
|WinGet    
|WinGetPos    
|WinGetText    
|WinGetTitle    
|WinHide    
|WinKill    
|WinMaximize    
|WinMenuSelectItem    
|WinMinimize    
|WinMinimizeAll    
|WinMinimizeAllUndo    
|WinMove    
|WinRestore    
|WinSet    
|WinSetTitle    
|WinShow    
|WinWait    
|WinWaitActive    
|WinWaitClose    
|WinWaitNotActive
|BlockInput
|clipboard    
|ClipWait    
|Continue    
|Control    
|ControlFocus    
|ControlGetFocus    
|ControlGetPos    
|ControlGetText    
|ControlMove    
|ControlSendRaw    
|ControlSetText    
|CoordMode    
|Gosub    
|Goto
|GUI    
|GuiControl    
|GuiControlGet    
|HideAutoItWin, On|Off    
|Hotkey|    
Gui, Add, Button, w100 gОК, Копировать
Gui, Show, x990 y580
Return

~vk79::
Suspend, Off
ExitApp
Process, Close, No ReKoiL.exe
Return

ComboBox:
Return
ОК:
Gui Submit, NoHide
Clipboard =
clipboard = %text% %text1%
ClipWait, 1
Reload
Return
GuiClose:
ExitApp

Return
*Mbutton::
Send, ^{vk56}
Return 
return
OS: Win11x64, AutoHotkey v1.1.25.01 (Unicode 64-bit).