Jump to content

gelman

Members
  • Posts

    1
  • Joined

  • Last visited

Everything posted by gelman

  1. Hello, I'm using this example: #include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <ListBoxConstants.au3> #include <ProgressConstants.au3> #include <SliderConstants.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #include <GuiComboBox.au3> #Include <GuiListBox.au3> #Include <GuiEdit.au3> #Include "_Adlib.au3" #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("Form1", 427, 407, 193, 125) $List1 = GUICtrlCreateList("", 8, 8, 201, 214) $List2 = GUICtrlCreateList("", 216, 8, 193, 214) $Progress1 = GUICtrlCreateProgress(8, 232, 150, 17) $Slider1 = GUICtrlCreateSlider(8, 256, 150, 45) $Button1 = GUICtrlCreateButton("Button1", 8, 312, 75, 25, 0) $Button2 = GUICtrlCreateButton("Button2", 8, 352, 75, 25, 0) $Edit1 = GUICtrlCreateEdit("", 216, 232, 185, 97) $Label1 = GUICtrlCreateLabel("Label1", 112, 312, 80, 17) $Label2 = GUICtrlCreateLabel("Label2", 112, 352, 36, 17) $Button3 = GUICtrlCreateButton("Pause", 248, 360, 75, 25, 0) $Button4 = GUICtrlCreateButton("Resume", 328, 360, 75, 25, 0) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### $iCount = 0 _AdlibEnable("_1",1) _AdlibEnable("_2",1) _AdlibEnable("_3",1) _AdlibEnable("_4",400) _AdlibEnable("_5",500) _AdlibEnable("_6",6000) _AdlibEnable("_7",700) _AdlibEnable("_8",1) _AdlibEnable("_9",1000) _AdlibEnable("_0",2000) _AdlibActive() While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Button3 _AdlibPause(0) Case $Button4 _AdlibResume(0) EndSwitch WEnd Func _1() _GUICtrlListBox_AddString($List1, @SEC &"="& Random(0, 9) ) EndFunc Func _2() _GUICtrlListBox_AddString($List2, @SEC &"="& Random(9, 0) ) EndFunc Func _3() GUICtrlSetData($Progress1, Random(0, 100, 1)) EndFunc Func _4() GUICtrlSetData($Slider1, Random(0, 100, 1)) EndFunc Func _5() ControlMove("", "", $Button1, Random(0, 18), Random(300, 350)) EndFunc Func _6() ControlMove("", "", $Button2, Random(0, 24), Random(336, 352)) EndFunc Func _7() _GUICtrlEdit_AppendText($Edit1, "Hellow World, welcome to my world" &@CRLF) EndFunc Func _8() $iCount += 1 GUICtrlSetData($Label1, "count: " & $iCount) EndFunc Func _9() ToolTip("Hello", Random(@DesktopHeight, @DesktopWidth, 1)) EndFunc Func _0() ConsoleWrite("The cow barks like a fish" &@lf) EndFunc And I get this error: _Adlib.au3 (137) : ==> Variable used without being declared.: If $al_ID > $al_func[0] Or $al_ID < 0 Then Return 0 Any ideas how to fix it?
×
×
  • Create New...