GrungeRocker Posted May 27, 2005 Share 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] Link to comment Share on other sites More sharing options...
Ejoc Posted May 27, 2005 Share 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 Link to comment Share on other sites More sharing options...
GrungeRocker Posted May 28, 2005 Author Share 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] Link to comment Share on other sites More sharing options...
GrungeRocker Posted May 28, 2005 Author Share Posted May 28, 2005 no ideas? [font="Verdana"]In work:[list=1][*]InstallIt[*]New version of SpaceWar[/list] [/font] Link to comment Share on other sites More sharing options...
GrungeRocker Posted May 28, 2005 Author Share 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] Link to comment Share on other sites More sharing options...
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