GrungeRocker Posted May 27, 2005 Posted May 27, 2005 hi guys i made this little script but the scrollbar is not workin'... expandcollapse popup#include <GuiConstants.au3> global $maingui = GuiCreate("MyGUI", 352, 199,(@DesktopWidth-352)/2, (@DesktopHeight-199)/2 ) $List = GuiCtrlCreateList("", 0, 0, 350, 135) $iniladen = GuiCtrlCreateButton("Iniladen", 0, 160, 350, 40) GuiSetState() While 1 $msg = GuiGetMsg() Select Case $msg = $GUI_EVENT_CLOSE ExitLoop case $msg = $iniladen $inifile = FileOpenDialog("Iniauswählen", @DesktopDir, "Inidatein (*.ini)") $Inilesen = IniReadSectionNames($inifile) if @error Then Exit EndIf for $i = 1 to $inilesen[0] GUICtrlSetData($list, $inilesen[$i]) next case $msg = $list $var = IniReadSection($inifile, GUICtrlRead($list)) $b = $var[0][0] dim $text[$b] $x = 0 $y = 0 $hwnd = GUICreate("Info", 350, 275, -1, -1, $WS_VSCROLL, -1, $maingui) For $k = 1 To $var[0][0] $h = 0 $text[$h] = GUICtrlCreateLabel( $var[$k][0] & " = " & $var[$k][1], $x, $y, 275, 15) $y = $y + 15 Next guisetstate() EndSelect WEnd Exit but the scrollbar has no effect.. could anyone help me? [font="Verdana"]In work:[list=1][*]InstallIt[*]New version of SpaceWar[/list] [/font]
Ejoc Posted May 27, 2005 Posted May 27, 2005 The list scroll bar worked fine for me.... Start -> Programs -> AutoIt v3 -> AutoIt Help File -> Index -> (The Function you are asking about)----- Links -----DllStruct UDFsRSA Crypto UDFs
GrungeRocker Posted May 28, 2005 Author Posted May 28, 2005 no i mean this scrollbar: $hwnd = GUICreate("Info", 350, 275, -1, -1, $WS_VSCROLL, -1, $maingui) For $k = 1 To $var[0][0] $h = 0 $text[$h] = GUICtrlCreateLabel( $var[$k][0] & " = " & $var[$k][1], $x, $y, 275, 15) $y = $y + 15 Next [font="Verdana"]In work:[list=1][*]InstallIt[*]New version of SpaceWar[/list] [/font]
GrungeRocker Posted May 28, 2005 Author Posted May 28, 2005 no ideas? [font="Verdana"]In work:[list=1][*]InstallIt[*]New version of SpaceWar[/list] [/font]
GrungeRocker Posted May 28, 2005 Author Posted May 28, 2005 come on guys that hould be working! plz help me! [font="Verdana"]In work:[list=1][*]InstallIt[*]New version of SpaceWar[/list] [/font]
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now