Jump to content

strange problem


Recommended Posts

I havent made really any changes but now my gui requires a double or triple click before it goes this just started. can you see why

#Region ### START Koda GUI section ### Form=c:\program files\autoit3\koda_1.7.0.1\forms\tuneupcentral.kxf
$Form1_1 = GUICreate("Tune Up Pros", 367, 216, 192, 122)
$Tab1 = GUICtrlCreateTab(0, 0, 369, 233)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
$Tab1 = GUICtrlCreateTab(0, 0, 369, 233)
$TabSheet1 = GUICtrlCreateTabItem("Tune up")
$TuneButton1 = GUICtrlCreateButton("Download Files", 4, 41, 219, 25)
$TuneButton2 = GUICtrlCreateButton("Xp Tune", 4, 73, 107, 25)
$TuneButton3 = GUICtrlCreateButton("Vista Tune", 116, 73, 107, 25)
$TuneButton4 = GUICtrlCreateButton("Finish Tune Up", 4, 122, 219, 25)
$TuneButton5 = GUICtrlCreateButton("Shortcut", 4, 156, 219, 25)
$TuneCheckbox1 = GUICtrlCreateCheckbox("C", 12, 97, 27, 25)
$TuneCheckbox2 = GUICtrlCreateCheckbox("D", 44, 97, 27, 25)
$TuneCheckbox3 = GUICtrlCreateCheckbox("E", 76, 97, 35, 25)
$TabSheet2 = GUICtrlCreateTabItem("Infection Removal")
$TabSheet3 = GUICtrlCreateTabItem("Ultimate Tune Up")
$TabSheet4 = GUICtrlCreateTabItem("Unlimited information")
$Input1 = GUICtrlCreateInput("Joined On: x/x/xxxx", 15, 41, 219, 22)
$Button1 = GUICtrlCreateButton("Write Information", 15, 72, 219, 25)
$Button2 = GUICtrlCreateButton("Read information", 15, 106, 219, 25)
GUICtrlCreateTabItem("")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###


;unlimited stuff
                    Select
        Case $nMsg = $GUI_EVENT_CLOSE
            ExitLoop
        Case $nMsg = $Button1
            $var = GUICtrlRead($Input1)
        ;Write unlimited info
            RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Tune-up pros\", "Unlimited computer", "REG_SZ", "Unlimited member ")
            RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Tune-up pros\", "Date", "REG_SZ", $var)
    EndSelect

    


;~ Read Unlimited Information
    Select
        Case $nMsg = $GUI_EVENT_CLOSE
            ExitLoop
        Case $nMsg =  $Button2
            
            $var3 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Tune-up pros\", "Unlimited computer")
            $var4 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Tune-up pros\", "Date")
            MsgBox(4096, "Member since:", $var3 & $var4)
        EndSelect

this is just a snippet of code.

Link to comment
Share on other sites

I would rewrite that to use GuiOnEventMode, and assign all button hits to one function, where @GUI_CTRLID or ControlGetText($Form1_1, "", @GUI_CTRLID) would determine the action taken.

...but that's just me.

muttley

Valuater's AutoIt 1-2-3, Class... Is now in Session!For those who want somebody to write the script for them: RentACoder"Any technology distinguishable from magic is insufficiently advanced." -- Geek's corollary to Clarke's law
Link to comment
Share on other sites

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 account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...