, I opened DualListDlg.xml from the templates folder. I resized it
and some of the contols, added a button, and moved the others around. On the 2 list
boxes I removed the sort style and added the multiple select and vertical scroll styles.
I then generated it, copied and pasted into Scite and saved it. When I ran the script it
#include <GUIConstants.au3>
;Generated with Form Designer preview
$Form2 = GUICreate("CompileAssist Choices Dialog", 529, 471, 288, 114)
$ListBox1 = GUICtrlCreateList("", 18, 10, 184, 230, BitOR($LBS_MULTIPLESEL,$WS_VSCROLL), $WS_EX_CLIENTEDGE)
GUICtrlSetData(-1, "#Compiler_Allow_Decompile=y|#Compiler_AUT2EXE=|#Compiler_AUTOIT3=|#Compiler_Compression=4|#Compi
ler_Icon=|#Compiler_OutFile=|#Compiler_PassPhrase=|#Compiler_Prompt=y|#Compiler_Res_Comment=Precompi
le [Compiler Ver. 3.1.1.87]|#Compiler_Res_Description=|#Compiler_Res_Field=Email: |#Compiler_Res_FileVersion_AutoIncrement=y|#Compiler_Res_Fileversion=0.0.0.00|#Compiler_Res_LegalCop
yright=|#Compiler_Run_After=RunAfter.exe "&Chr(34)&"%in%"&Chr(34)&"|#Compiler_Run_AU3Check=n|#Compiler_Run_Before=CompileAssist.exe %in%|#EndRegion|#Region Compiler directives section")
$Button1 = GUICtrlCreateButton("==>", 240, 18, 37, 31)
$Button2 = GUICtrlCreateButton("=>>", 240, 59, 38, 31)
$Button3 = GUICtrlCreateButton("<==", 241, 100, 38, 30)
GUICtrlSetState(-1, $GUI_DISABLE)
$Button4 = GUICtrlCreateButton("<<=", 241, 140, 40, 31)
$ListBox2 = GUICtrlCreateList("", 318, 10, 193, 230, BitOR($LBS_MULTIPLESEL,$WS_VSCROLL), $WS_EX_CLIENTEDGE)
$Button5 = GUICtrlCreateButton("C&ontinue", 224, 437, 92, 31)
$Button6 = GUICtrlCreateButton("&Cancel", 322, 437, 93, 31)
$Button7 = GUICtrlCreateButton("&Help", 421, 437, 92, 31)
$Label1 = GUICtrlCreateLabel("Variable or Directive Name", 16, 248, 166, 18)
$Edit1 = GUICtrlCreateEdit("", 16, 272, 497, 49, -1, $WS_EX_CLIENTEDGE)
GUICtrlSetData($Edit1, "AEdit1")
$Edit2 = GUICtrlCreateEdit("", 16, 360, 497, 65, -1, $WS_EX_CLIENTEDGE)
GUICtrlSetData($Edit2, "AEdit2")
$Label2 = GUICtrlCreateLabel("Variable or Directive Value", 16, 328, 164, 18)
$Button1 = GUICtrlCreateButton("&Save", 16, 437, 92, 31)
$Label3 = GUICtrlCreateLabel("Add ==>", 260, 178, 53, 20)
$Label4 = GUICtrlCreateLabel("<== Remove", 208, 208, 80, 20)
GUISetState(@SW_SHOW)
While 1
$msg = GuiGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
Case $msg = "foo"
Case Else
;;;;;;;
EndSelect
WEnd
Exit
I don't see what is wrong with it. I'm using beta 87 and have toggled the beta to be the default.
Edit 2: I did some poking about. I found this style ($LBS_MULTIPLESEL)
referenced in several examples on disk, but not in GUIConstants.au3. In the
examples it is specified as
Dim $LBS_MULTIPLESEL = 0x8.
When I add that DIM statement to the script it doesn't error and it does allow me
to multiselect in the list box, I guess this posting needs to be moved to the bug
list. I think the moderators have to do that.
In earlier looking I didn't find anything in the Help file when I searched for "$LBS_"
using the Help File Search TAB. When I went directly to the Styles page and and
"$LBS_MULTIPLESEL" I did find it in the Help File examples dealing with list box