Custom Query

Toolbar button text accelerator prefix underscore disappears when a Button/Radio/Checkbox/Group control is added to GUI

Tested on 2 machines running XP SP2+ EN X86 AutoIt: Prod. v3.2.10.0, Beta v3.2.11.7

The problem is intermittent when run from SciTE, but consistent when compiled.

#include <GuiToolBar.au3>
#include <GuiConstantsEx.au3>
#include <Constants.au3>
#include <WindowsConstants.au3>

Opt("MustDeclareVars", 1)

_Main()

Func _Main()
	Local $hgui, $hToolbar, $Label
	Local Enum $idNew = 1000, $idOpen, $idSave, $idHelp
	Local $aStrings[4]
	Local $bStyle = BitOR($BTNS_SHOWTEXT, $BTNS_AUTOSIZE)

	$hgui = GUICreate(" Toolbar button text accelerator prefix underscore test", 400, 150)
	GUISetBkColor(0xd3d3d3, $hgui)
	$hToolbar = _GUICtrlToolbar_Create($hgui)

	_GUICtrlToolbar_AddBitmap($hToolbar, 1, -1, $IDB_STD_LARGE_COLOR)
	$aStrings[0] = _GUICtrlToolbar_AddString($hToolbar, "&New") ;chr(38) & "New"
	$aStrings[1] = _GUICtrlToolbar_AddString($hToolbar, "&Open");chr(38) & "Open"
	$aStrings[2] = _GUICtrlToolbar_AddString($hToolbar, "&Save");chr(38) & "Save"
	$aStrings[3] = _GUICtrlToolbar_AddString($hToolbar, "&Help");chr(38) & "Help"
	_GUICtrlToolbar_AddButton($hToolbar, $idNew, $STD_FILENEW, $aStrings[0], $bStyle)
	_GUICtrlToolbar_AddButton($hToolbar, $idOpen, $STD_FILEOPEN, $aStrings[1], $bStyle)
	_GUICtrlToolbar_AddButton($hToolbar, $idSave, $STD_FILESAVE, $aStrings[2], $bStyle)
	_GUICtrlToolbar_AddButtonSep($hToolbar)
	_GUICtrlToolbar_AddButton($hToolbar, $idHelp, $STD_HELP, $aStrings[3], $bStyle)
	
	GUISetState()
	Sleep(1500)
	; add any one of these controls to remove all of the toolbar accelerator prefix underscores
	;GUICtrlCreateGroup("Group",150, 110, 100, 25)
	;GUICtrlCreateRadio("Radio", 150, 110, 100, 25)
	;GUICtrlCreateCheckbox("Checkbox", 150, 110, 100, 25)
	GUICtrlCreateButton("Button", 150, 110, 100, 25)
	
	$Label = GUICtrlCreateLabel(" Toolbar button text underscores may or may not be removed." & @CR & _
			" The problem is intermittant when run from SciTE, but consistent when compiled.", 10, 60, 380, 40)
	GUICtrlSetBkColor($Label, 0XFFFFFF)
	
	For $i = 0 To 3
		ConsoleWrite("-> BtnText:" & @TAB & _GUICtrlToolbar_GetButtonText($hToolbar, $i + 1000) & @CRLF)
		ConsoleWrite("-> StringPool:" & @TAB & _GUICtrlToolbar_GetString($hToolbar, $i) & @CRLF)
		ConsoleWrite("-> BtnStyle:" & @TAB & _GUICtrlToolbar_GetButtonStyle($hToolbar, $i + 1000) & @CRLF)
	Next
	
	Do
	Until GUIGetMsg() = $GUI_EVENT_CLOSE

EndFunc   ;==>_Main

I have a multimon setup. The primary monitor is on the right side and the secondary monitor is on the left side.

[ Secondary monitor ][ Primary monitor ] <-- Negative (0) Positive -->

That means the X coordinates on the secondary monitor are negative, the line between the monitors is 0.

Anyways, in Koda, when I click "Generate code" the left half of the "Code" window appears on the right edge of the primary monitor.

Does Koda do something like take the desktop width, then place the "Code" window according to that? I think there's some code to get the primary/secondary/etc monitor resolutions and positions, but it might be easier just to have Windows place the window in the default position (I have no idea how Koda does it, but that's how I do it when I do a GUICreate --> using Default, Default).

Line 1468 on Version 1.9.5.7 is wrong

old:
Update_Directive($Full_source, $directives, "AutoIt3Wrapper_UseX64", $INP_Change2CUI, "n", "1=y;0=n;4=n")  

change:
Update_Directive($Full_source, $directives, "#'''AutoIt3Wrapper_Change2CUI'''", $INP_Change2CUI, "n", "1=y;0=n;4=n")  ;+pt