Basic Help reading files into arrays

[Reister]

Hi,

I need to read a file and convert it into an array.

It is done using: _FileReadToArray("config.cfg", $configCfgAr)

Then I process it using:

For $element In $configCfgAr
if $i > 1 Then
 
  $Variable = StringSplit($element,":",1)
  $Datos[$i][1]=$Variable[1]
  $Datos[$i][2]=$Variable[2]
  $Parametros[$i][1] = GUICtrlCreateLabel($Variable[1], 40, $y, 250, 20)
  $Parametros[$i][2] = GUICtrlCreateInput($Variable[2], 252, $y, 500, 24)
 
EndIf
$i=$i+1
$y = $y + 20
Next

The issue is when there are empty lines in the config.cfg that I'm reading, the line $Datos[$i][2]=$Variable[2] gives Array Error.

How could I control that? How coulf I make sure that $Variable[2] exists or not?

THANKS!

[AlmarM]

Take a look at IsArray.

[water]

If you encounter an empty line in config.cfg then StringSplit will return an error because there is not ":" in the variable.

So I would test for the error:

For $element In $configCfgAr
if $i > 1 Then 
  $Variable = StringSplit($element,":",1)
  If @error = 0 Then
    $Datos[$i][1]=$Variable[1]
    $Datos[$i][2]=$Variable[2]
    $Parametros[$i][1] = GUICtrlCreateLabel($Variable[1], 40, $y, 250, 20)
    $Parametros[$i][2] = GUICtrlCreateInput($Variable[2], 252, $y, 500, 24)
    $i=$i+1
  EndIf
EndIf
$y = $y + 20
Next

[Reister]

If you encounter an empty line in config.cfg then StringSplit will return an error because there is not ":" in the variable.

So I would test for the error:

For $element In $configCfgAr
if $i > 1 Then
  $Variable = StringSplit($element,":",1)
  If @error = 0 Then
    $Datos[$i][1]=$Variable[1]
    $Datos[$i][2]=$Variable[2]
    $Parametros[$i][1] = GUICtrlCreateLabel($Variable[1], 40, $y, 250, 20)
    $Parametros[$i][2] = GUICtrlCreateInput($Variable[2], 252, $y, 500, 24)
    $i=$i+1
  EndIf
EndIf
$y = $y + 20
Next

It didn't help, since it seems that with empty lines it doesn't return 0

And also, another question, how could I delete the@CRLF of the last line?

Edited April 18, 2012 by Reister

[Reister]

Take a look at IsArray.

it didin't help also, because the variable is an array, but with empty parameters

[AlmarM]

Then simply check for nothing?

$var1 = "test"
$var2 = ""

MsgBox(0, "", ($var1 == ""))
MsgBox(0, "", ($var2 == ""))

[water]

It didn't help, since it seems that with empty lines it doesn't return 0

That's right. For empty lines @error is set to 1. My code only processes the data if the springsplit was successful - which is not true for empty lines.

Don't understand why it shouldn't help.

Do you still get the array error on line "$Datos[$i][2]=$Variable[2]"?

[Reister]

Then simply check for nothing?

$var1 = "test"
$var2 = ""

MsgBox(0, "", ($var1 == ""))
MsgBox(0, "", ($var2 == ""))

It seems not working

With arrays if I do this check:

if ($Variable[2] == "") Then $Datos[$i][2]=$Variable[2]

And $Variable[2] doesn't exist, then it crashes

[Reister]

That's right. For empty lines @error is set to 1. My code only processes the data if the springsplit was successful - which is not true for empty lines.

Don't understand why it shouldn't help.

Do you still get the array error on line "$Datos[$i][2]=$Variable[2]"?

Yes I have the error even using this.

Also, it is not valid for me, since the config.cfg could contain lines like:

PARAM1:VALUE

PARAM2:

PARAM3:VALUE

So, PARAM2, will be skipped, and I don't want it

Edited April 18, 2012 by Reister

[BrewManNH]

Try this:

For $element In $configCfgAr
    If $i > 1 Then
        $Variable = StringSplit($element, ":", 1)
        If IsArray($Variable) Then
;~   If @error = 0 Then
            $Datos[$i][1] = $Variable[1]
            $Parametros[$i][1] = GUICtrlCreateLabel($Variable[1], 40, $y, 250, 20)
            If $Variable[0] > 1 Then
                $Datos[$i][2] = $Variable[2]
                $Parametros[$i][2] = GUICtrlCreateInput($Variable[2], 252, $y, 500, 24)
            EndIf
            $i = $i + 1
        EndIf
    EndIf
    $y = $y + 20
Next

[GEOSoft]

will the parameters/values always be separated by a colon?