Just Curious....

[LurchMan]

Hey All -

I was just wonder if theres an easier way of writing this section below. I've thought of using a Select..case but I need it to read through all of them not just select one. This only has 2 records in it right now but when im done it will have anywhere around 50 records....(thats too much code the way im doing it for something simple....)

Thank you for any help in advance

$sRead = IniRead ($sFile , "01 Dly Prd Rpt1", "HasRun" , 0 )
$sRead2 = IniRead ($sFile , "06 Prod Rpts", "HasRun" , 0 )
If $sRead = 1 Then
    GUICtrlSetState ($DlyRpts1 , $GUI_DISABLE)
EndIf
If $sRead2 = 1 Then
    GUICtrlSetState ($ProdRpts , $GUI_DISABLE)
EndIf

[PsaltyDS]

Hey All -

I was just wonder if theres an easier way of writing this section below. I've thought of using a Select..case but I need it to read through all of them not just select one. This only has 2 records in it right now but when im done it will have anywhere around 50 records....(thats too much code the way im doing it for something simple....)

Thank you for any help in advance

$sRead = IniRead ($sFile , "01 Dly Prd Rpt1", "HasRun" , 0 )
$sRead2 = IniRead ($sFile , "06 Prod Rpts", "HasRun" , 0 )
If $sRead = 1 Then
    GUICtrlSetState ($DlyRpts1 , $GUI_DISABLE)
EndIf
If $sRead2 = 1 Then
    GUICtrlSetState ($ProdRpts , $GUI_DISABLE)
EndIf

You want your list of ini sections and the associated control IDs in a 2D array (or two 1D arrays), and then just loop through it to handle each case:

Global $avReports[2][2] = [["01 Dly Prd Rpt1", $DlyRpts1], _
        ["06 Prod Rpts", $ProdRpts]]

For $n = 0 To UBound($avReports) - 1
    $sRead = IniRead($sFile , $avReports[$n][0], "HasRun" , 0 )
    If $sRead = 1 Then GUICtrlSetState($avReports[$n][1], $GUI_DISABLE)
Next

[LurchMan]

You want your list of ini sections and the associated control IDs in a 2D array (or two 1D arrays), and then just loop through it to handle each case:

Global $avReports[2][2] = [["01 Dly Prd Rpt1", $DlyRpts1], _
        ["06 Prod Rpts", $ProdRpts]]

For $n = 0 To UBound($avReports) - 1
    $sRead = IniRead($sFile , $avReports[$n][0], "HasRun" , 0 )
    If $sRead = 1 Then GUICtrlSetState($avReports[$n][1], $GUI_DISABLE)
Next

Thanks for your reply....

bear with me for a min if u dont mind, I don't understand arrays (ill admit im a complete noob at coding, i got thrown into the position at work because i knew the basics)

If i understand it correctly for each different record i would just have to add to it the original array like:

Global $avReports[3][3] = [["01 Dly Prd Rpt1", $DlyRpts1], _
        ["06 Prod Rpts", $ProdRpts]["Example1" , $Example1]]

For $n = 0 To UBound($avReports) - 1
    $sRead = IniRead($sFile , $avReports[$n][0], "HasRun" , 0 )
    If $sRead = 1 Then GUICtrlSetState($avReports[$n][1], $GUI_DISABLE)
Next

and for each new record just incriment the size of the array? and this doesn't have limits on how big the array is?

[PsaltyDS]

Thanks for your reply....

bear with me for a min if u dont mind, I don't understand arrays (ill admit im a complete noob at coding, i got thrown into the position at work because i knew the basics)

If i understand it correctly for each different record i would just have to add to it the original array like:

Global $avReports[3][3] = [["01 Dly Prd Rpt1", $DlyRpts1], _
        ["06 Prod Rpts", $ProdRpts]["Example1" , $Example1]]

For $n = 0 To UBound($avReports) - 1
    $sRead = IniRead($sFile , $avReports[$n][0], "HasRun" , 0 )
    If $sRead = 1 Then GUICtrlSetState($avReports[$n][1], $GUI_DISABLE)
Next

and for each new record just incriment the size of the array? and this doesn't have limits on how big the array is?

Close.

Think of a 1D array as a numbered list. The only thing even slightly strange about it is that the elements are numbered from zero. So a 1D array with three elements would be addressed as $avArray[0], $avArray[1], $avArray[2]. The count is 3 but the last element is 2 because they are numbered from zero.

A 2D is like a spreadsheet. By convention, most people treat the first index as the rows and and the second as columns. Both indexes are still zero based. In your code, you are adding more rows but not more columns, so the array size would be $avReports[3][2]. Also, each 'row' of data is enclosed in square brackets and there should be a comma between each set.

So your example should be:

Global $avReports[3][2] = [["01 Dly Prd Rpt1", $DlyRpts1], _
        ["06 Prod Rpts", $ProdRpts],["Example1" , $Example1]]

Another example with five 'rows' including some formatting to make it easier to read:

Global $avReports[5][2] = [["01 Dly Prd Rpt1", $DlyRpts1], _
        ["06 Prod Rpts", $ProdRpts], _
        ["Example3", $Example3], _
        ["Example4", $Example4], _
        ["Example5", $Example5]]

The AutoIt Wiki has a page with good info on arrays, but you have to search for it, as the pages links don't really get you there: AutoIt Arrays

There is a learning curve involved, but array are very much worth figuring out. They make many things much easier to do.

[LurchMan]

Thank you! I'm atually starting to understand arrays now, and i think ive got a lot of work of cleaning up my other scripts to make them easier to read and shorter.

Again - Thank you for all your help.