Jump to content

Help Selecting item form combo box


starpc
 Share

Recommended Posts

Hello I'm trying to perform a specific function based on the year in the combo box, my problem is when I click ok I can't get the function to execute. Any Thoughts:

$wfx32Loc = RegRead("HKEY_LOCAL_MACHINE\Software\CCHWINFX\", "dir") & "\"
If ($wfx32Loc = "\") Then
    MsgBox(16, "Error", "No Tax install detected.  Please run workstation setup.")
    Exit
EndIf

$year = ""

$ctx = $wfx32Loc & "ctx.ini"
$ctxback = $wfx32Loc & "ctx.old"
$ctxback2 = $wfx32Loc & "ctx.old2"


#include <GUIConstants.au3>

Opt("GUIOnEventMode", 1)
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("AForm1", 124, 113, 193, 115)
$okay = GUICtrlCreateButton("Okay", 24, 72, 73, 33, 0)
GUICtrlSetOnEvent($okay, "years")
$Label1 = GUICtrlCreateLabel("Please select a year:", 8, 8, 102, 17)
$year = GUICtrlCreateCombo("", 24, 40, 73, 25, BitOR($CBS_DROPDOWNLIST, $CBS_AUTOHSCROLL))
GUICtrlSetData(-1, "2006|2005|2004|2003|2002|2001|2000|1999|1998|1997")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    Sleep(100)
WEnd

    
Func years()
    If $year = "2006" Then
        MsgBox(0,"a","test")
        $org = $wfx32Loc & "06I\laser"
        $org2 = "06IXlaser"
        IniWrite($ctx, "paths", $org2, $org)
        Exit
    ElseIf $year = "2005" Then
        $org = $wfx32Loc & "05I\laser"
        $org2 = "05IXlaser"
        IniWrite($ctx, "paths", $org2, $org)
        Exit
    EndIf
EndFunc

Link to comment
Share on other sites

Hi,

You should not to check “If $year”, this is only a Control ID, it should be readen by GuiCtrlRead()...

Func years()
    If GUICtrlRead($year) = "2006" Then
        MsgBox(0,"a","test")
        $org = $wfx32Loc & "06I\laser"
        $org2 = "06IXlaser"
        IniWrite($ctx, "paths", $org2, $org)
        Exit
    ElseIf GUICtrlRead($year) = "2005" Then
        $org = $wfx32Loc & "05I\laser"
        $org2 = "05IXlaser"
        IniWrite($ctx, "paths", $org2, $org)
        Exit
    EndIf
EndFunc

 

Spoiler

Using OS: Win 7 Professional, Using AutoIt Ver(s): 3.3.6.1 / 3.3.8.1

AutoIt_Rus_Community.png AutoIt Russian Community

My Work...

Spoiler

AutoIt_Icon_small.pngProjects: ATT - Application Translate Tool {new}| BlockIt - Block files & folders {new}| SIP - Selected Image Preview {new}| SISCABMAN - SciTE Abbreviations Manager {new}| AutoIt Path Switcher | AutoIt Menu for Opera! | YouTube Download Center! | Desktop Icons Restorator | Math Tasks | KeyBoard & Mouse Cleaner | CaptureIt - Capture Images Utility | CheckFileSize Program

AutoIt_Icon_small.pngUDFs: OnAutoItErrorRegister - Handle AutoIt critical errors {new}| AutoIt Syntax Highlight {new}| Opera Library! | Winamp Library | GetFolderToMenu | Custom_InputBox()! | _FileRun UDF | _CheckInput() UDF | _GUIInputSetOnlyNumbers() UDF | _FileGetValidName() UDF | _GUICtrlCreateRadioCBox UDF | _GuiCreateGrid() | _PathSplitByRegExp() | _GUICtrlListView_MoveItems - UDF | GUICtrlSetOnHover_UDF! | _ControlTab UDF! | _MouseSetOnEvent() UDF! | _ProcessListEx - UDF | GUICtrl_SetResizing - UDF! | Mod. for _IniString UDFs | _StringStripChars UDF | _ColorIsDarkShade UDF | _ColorConvertValue UDF | _GUICtrlTab_CoverBackground | CUI_App_UDF | _IncludeScripts UDF | _AutoIt3ExecuteCode | _DragList UDF | Mod. for _ListView_Progress | _ListView_SysLink | _GenerateRandomNumbers | _BlockInputEx | _IsPressedEx | OnAutoItExit Handler | _GUICtrlCreateTFLabel UDF | WinControlSetEvent UDF | Mod. for _DirGetSizeEx UDF
 
AutoIt_Icon_small.pngExamples: 
ScreenSaver Demo - Matrix included | Gui Drag Without pause the script | _WinAttach()! | Turn Off/On Monitor | ComboBox Handler Example | Mod. for "Thinking Box" | Cool "About" Box | TasksBar Imitation Demo

Like the Projects/UDFs/Examples? Please rate the topic (up-right corner of the post header: Rating AutoIt_Rating.gif)

* === My topics === *

==================================================
My_Userbar.gif
==================================================

 

 

 

AutoIt is simple, subtle, elegant. © AutoIt Team

Link to comment
Share on other sites

Hi,

You should not to check If $year, this is only a Control ID, it should be readen by GuiCtrlRead()...

Func years()
    If GUICtrlRead($year) = "2006" Then
        MsgBox(0,"a","test")
        $org = $wfx32Loc & "06I\laser"
        $org2 = "06IXlaser"
        IniWrite($ctx, "paths", $org2, $org)
        Exit
    ElseIf GUICtrlRead($year) = "2005" Then
        $org = $wfx32Loc & "05I\laser"
        $org2 = "05IXlaser"
        IniWrite($ctx, "paths", $org2, $org)
        Exit
    EndIf
EndFunc
Thanks, works like a charm
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...