8879899714 0 Posted September 26, 2007 hi people, need some help here ... i am trying to write a GUI interface whereby i can save the inputs to a file and then load them back when i start the interface. i am not getting anywhere, especially after i tried loading, the input is blank. can anyone look into my script and correct me? thanks #include <GUIConstants.au3> Global $start Global $way1x, $way1y GUICreate("Testscript", 300, 420) $savebotbutt=GUICtrlCreateButton("Save", 160, 390, 60, 30) ; show the Save button $exitbotbutt=GUICtrlCreateButton("Exit", 220, 390, 80, 30) ; show the Exit button $showGUI = 0 ; setting the GUI condition HotKeySet("{F6}","show") ; using hotkey to show menu GUICtrlCreateTab (0, 0, 300, 390) $tab2=GUICtrlCreateTabitem ("WayPoints") GUICtrlCreateLabel ("Training Ground Location", 10, 30, 200, 20) $checkCN = GUICtrlCreateCheckbox ("", 20, 50, 20, 20) ; 1st checkbox location GUICtrlCreateLabel ("X : ", 60, 50, 15, 20) ;~ $way1x = Int(IniRead(".\testscript.ini","Waypoints","1x","-1")) GUICtrlCreateInput ($way1x, 80, 50, 50, 20) GUICtrlCreateLabel ("Y : ", 150, 50, 15, 20) ;~ $way1y = Int(IniRead(".\testscript.ini","Waypoints","1y","-1")) GUICtrlCreateInput ($way1y, 170, 50, 50, 20) Func show() If $showGUI = 0 Then Read() GUISetState(@SW_SHOW) ; show the menu when hotkey pressed $showGUI = 1 Else GUISetState(@SW_HIDE) ; hide the menu when hotkey pressed $showGUI = 0 EndIf EndFunc While 1 ; main body of program, loop till condition met $msg = GUIGetMsg() Select Case $msg = $GUI_EVENT_CLOSE ; when the top right cancel button is pressed Exit Case $msg = $savebotbutt ; pressing the Save button Write() MsgBox(64, "Test Box", "You clicked on Save!") Case $msg = $exitbotbutt ; pressing the Exit button Exit EndSelect Wend Func Write() IniWrite(".\testscript.ini","Waypoints","1x",$way1x) IniWrite(".\testscript.ini","Waypoints","1y",$way1y) EndFunc Func Read() $way1x = Int(IniRead(".\testscript.ini","Waypoints","1x","-1")) $way1y = Int(IniRead(".\testscript.ini","Waypoints","1y","-1")) EndFunc Share this post Link to post Share on other sites
Valuater 130 Posted September 26, 2007 Maybe... expandcollapse popup#include <GUIConstants.au3> Global $start Global $way1x, $way1y $showGUI = 0 ; setting the GUI condition HotKeySet("{F6}", "show") ; using hotkey to show menu Read() GUICreate("Testscript", 300, 420) $savebotbutt = GUICtrlCreateButton("Save", 160, 390, 60, 30) ; show the Save button $exitbotbutt = GUICtrlCreateButton("Exit", 220, 390, 80, 30) ; show the Exit button GUICtrlCreateTab(0, 0, 300, 390) $tab2 = GUICtrlCreateTabItem("WayPoints") GUICtrlCreateLabel("Training Ground Location", 10, 30, 200, 20) $checkCN = GUICtrlCreateCheckbox("", 20, 50, 20, 20) ; 1st checkbox location GUICtrlCreateLabel("X : ", 60, 50, 15, 20) ;~ $way1x = Int(IniRead(".\testscript.ini","Waypoints","1x","-1")) $input_x = GUICtrlCreateInput($way1x, 80, 50, 50, 20) GUICtrlCreateLabel("Y : ", 150, 50, 15, 20) ;~ $way1y = Int(IniRead(".\testscript.ini","Waypoints","1y","-1")) $input_y = GUICtrlCreateInput($way1y, 170, 50, 50, 20) GUISetState(@SW_HIDE) While 1 ; main body of program, loop till condition met $msg = GUIGetMsg() Select Case $msg = $GUI_EVENT_CLOSE ; when the top right cancel button is pressed Exit Case $msg = $savebotbutt ; pressing the Save button Write() MsgBox(64, "Test Box", "You clicked on Save!") Case $msg = $exitbotbutt ; pressing the Exit button Exit EndSelect WEnd ;;-------------------------------------- Functions -------------------------------- Func show() If $showGUI = 0 Then Read() GUISetState(@SW_SHOW) ; show the menu when hotkey pressed $showGUI = 1 Else GUISetState(@SW_HIDE) ; hide the menu when hotkey pressed $showGUI = 0 EndIf EndFunc ;==>show Func Write() IniWrite(".\testscript.ini", "Waypoints", "1x", GUICtrlRead($input_x)) IniWrite(".\testscript.ini", "Waypoints", "1y", GUICtrlRead($input_y)) EndFunc ;==>Write Func Read() $way1x = Int(IniRead(".\testscript.ini", "Waypoints", "1x", "-1")) $way1y = Int(IniRead(".\testscript.ini", "Waypoints", "1y", "-1")) EndFunc ;==>Read 8) Share this post Link to post Share on other sites
8879899714 0 Posted September 27, 2007 Hi Valuater, thanks for the help. it works wonder Share this post Link to post Share on other sites
Valuater 130 Posted September 27, 2007 (edited) Hi Valuater, thanks for the help. it works wonder Welcomewhats the phone number for???8)Thanks for sharing Edited September 27, 2007 by Valuater Share this post Link to post Share on other sites