AutoHotkey Community

Code: Select all

;based on:
;GUI COMMANDS: COMPLETE RETHINK - AutoHotkey Community
;https://autohotkey.com/boards/viewtopic.php?f=5&t=25893&p=132424#p132424

;tested on Windows 7
q:: ;Notepad (Open/Save As dialog) - set ComboBox to UTF-8
Control, ChooseString, UTF-8, ComboBox3, A
ControlGet, hCtl, Hwnd,, ComboBox3, A
hWndParent := DllCall("user32\GetParent", Ptr,hCtl, Ptr)
;CBN_SELENDOK := 9
SendMessage, 0x111, % (9 << 16), % hCtl,, % "ahk_id " hWndParent ;WM_COMMAND := 0x111
return

Code: Select all

;e.g. Notepad (Windows 7): test save as UTF-8
;start a new file
;type a Unicode character into the window e.g. √ (square root)
;try to save the file (wait for the Save As dialog to appear)
;check that the encoding is ANSI
;use AHK to set the encoding to UTF-8, and try to save
;see if you get a warning about Unicode characters
;(this would imply that although the ComboBox selection may have changed,
;Notepad has not been informed of the change in selection)

q::
Control, Choose, 4, ComboBox3, A
;Control, ChooseString, UTF-8, ComboBox3, A

;ControlChoose(4, "ComboBox3", "A")
;ControlChooseString("UTF-8", "ComboBox3", "A")
return

Code: Select all

q::
Control, Choose, 4, ComboBox3, A

Code: Select all

q::
setcontroldelay -1
ControlClick, ComboBox3, A,,,, NA
Control, Choose, 4, ComboBox3, A
ControlClick, ComboBox3, A,,,, NA