j0kky

Assign a value to an array in array element

15 posts in this topic

#1 ·  Posted (edited)

Hi guys,

talking about array in array, I would like to directly assign a value to an element in an array contained in another array.

While it is quite simple to access the value if it is already setted:

Local $a[3] = [1, 2], $b[2] = [3, 4]
$a[2] = $b
ConsoleWrite(($a[2])[0] & " " & ($a[2])[1] & @CRLF)

If I try to write directly to the element, I get an error:

Local $a[3] = [1, 2]
Local $b[2]
$a[2] = $b
($a[2])[0] = 1

Is assigning first every value of the contained array and then including it in the container the only way?

Edited by j0kky

Share this post


Link to post
Share on other sites



#2 ·  Posted (edited)

You need a helper function with ByRef parameter.

 

Simple example:

#include <Array.au3>
Local $a[3] = [1, 2], $b[2] = [3, 4]
$a[2] = $b

ConsoleWrite(($a[2])[0] & " " & ($a[2])[1] & @CRLF)

ModArray($a[2], 0, "Test")

_ArrayDisplay($a[2])

Func ModArray(ByRef $aArray, $iElement, $value)
    $aArray[$iElement] = $value
EndFunc

Otherwise a copy of the array will be created.

Edited by UEZ
1 person likes this

Please don't send me any personal message and ask for support! I will not reply!

Selection of finest graphical examples at Codepen.io

The own fart smells best!
Her 'sikim hıyar' diyene bir avuç tuz alıp koşma!
¯\_(ツ)_/¯

Share this post


Link to post
Share on other sites

Thank you for support!

Writing a function with a ByRef param is a smart solution, anyhow it could be useful to directly assign the value to the element.

I'll open a feature request in the bug tracker, maybe in some of the next Autoit version it will be implemented.

Share this post


Link to post
Share on other sites
3 hours ago, j0kky said:

I'll open a feature request in the bug tracker, maybe in some of the next Autoit version it will be implemented.

Soon is christmas, I would suggest to send the feature list rather to Santa Claus. 


Please don't send me any personal message and ask for support! I will not reply!

Selection of finest graphical examples at Codepen.io

The own fart smells best!
Her 'sikim hıyar' diyene bir avuç tuz alıp koşma!
¯\_(ツ)_/¯

Share this post


Link to post
Share on other sites
On ‎19‎.‎11‎.‎2016‎. at 3:29 PM, j0kky said:

Hi guys,

talking about array in array, I would like to directly assign a value to an element in an array contained in another array.

While it is quite simple to access the value if it is already setted:

Local $a[3] = [1, 2], $b[2] = [3, 4]
$a[2] = $b
ConsoleWrite(($a[2])[0] & " " & ($a[2])[1] & @CRLF)

If I try to write directly to the element, I get an error:

Local $a[3] = [1, 2]
Local $b[2]
$a[2] = $b
($a[2])[0] = 1

Is assigning first every value of the contained array and then including it in the container the only way?

What error? If you see error, then it's not by AutoIt because your code is perfectly valid. It's only that the lase line is not an assignment.

There is no error.


♡♡♡

.

eMyvnE

Share this post


Link to post
Share on other sites

#7 ·  Posted (edited)

5 minutes ago, trancexx said:

It's only that the lase line is not an assignment.

($a[2])[0] = 1

The problem is exatly that this line is not considered as an assignment, but ($a[2])[0] is correctly parsed when you try to read from it.

Edited by j0kky

Share this post


Link to post
Share on other sites

@trancexx,

Given

local $a = [1,2,3], $b = ['a','b','c'], $c = [$a,$b]

how would you change the "a" in array $c?

kylomas


Forum Rules         Procedure for posting code

"I like pigs.  Dogs look up to us.  Cats look down on us.  Pigs treat us as equals."

- Sir Winston Churchill

Share this post


Link to post
Share on other sites
1 hour ago, j0kky said:
($a[2])[0] = 1

The problem is exatly that this line is not considered as an assignment, but ($a[2])[0] is correctly parsed when you try to read from it.

In both cases you read from it. That's the whole thing.


♡♡♡

.

eMyvnE

Share this post


Link to post
Share on other sites
13 minutes ago, kylomas said:

@trancexx,

Given

local $a = [1,2,3], $b = ['a','b','c'], $c = [$a,$b]

how would you change the "a" in array $c?

kylomas

Just like UEZ did.


♡♡♡

.

eMyvnE

Share this post


Link to post
Share on other sites

#11 ·  Posted (edited)

1 hour ago, trancexx said:

In both cases you read from it. That's the whole thing.

Yes, now it is clear, but it sounds strange to me because if you declare a simple array and try to do the same thing, Autoit doesn't read from it but assigns to it the value.

Local $a[2]
$a[0] = 1

 

Edited by j0kky

Share this post


Link to post
Share on other sites
28 minutes ago, j0kky said:

Yes, now it is clear, but it sounds strange to me because if you declare a simple array and try to do the same thing, Autoit doesn't read from it but assigns to it the value.

Local $a[2]
$a[0] = 1

 

That's because you're showing different case.

What you did earlier was more like this:

Local $a[2]
($a[0]) = 1

What does this do?

 

 

 


♡♡♡

.

eMyvnE

Share this post


Link to post
Share on other sites

Don't read wrong what I say, I'm just explaining what AutoIt does. I wrote the code, so I would know.
However I did left it in beta stage, and afterward Jon decided he'd release it. I would ask... but he did not :).


♡♡♡

.

eMyvnE

Share this post


Link to post
Share on other sites

#14 ·  Posted (edited)

No problem @trancexx, I'm here to learn :)

I'll try to pose the issue in another way (but I think you already get my point):

If I'm working with a simple array:

Local $a[2]
$a[0] = 1
ConsoleWrite(($a)[0] & @CRLF)
ConsoleWrite($a[0] & @CRLF)

ConsoleWrite outputs are identical.

But if I'm dealing with an array into an array:

Local $a[3] = [1, 2], $b[2] = [3, 4]
$a[2] = $b
ConsoleWrite(($a[2])[0] & @CRLF)
ConsoleWrite($a[2][0] & @CRLF)

The second one (obviously) returns an error because it searches for the 2nd dimension of $a.

 

Edited by j0kky

Share this post


Link to post
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

  • Similar Content

    • SkysLastChance
      By SkysLastChance
      I keep losing the count of my $r varable when I go into the dropdown () function and call the same function.
      #include <Excel.au3> #include <AutoItConstants.au3> #include<GUIConstantsEx.au3> #include<EditConstants.au3> #include<GUIConstants.au3> Global $iBox, $oExcel, $oWorkbook, $r = 1, $x = 3 HowMany() Excel () Dropdown () Sleep (500) Func Dropdown () $list = GUICreate("Chart", 225, 80) $combobox = GUICtrlCreateCombo("Clinic 1", 10, 10, 120, 20) GUICtrlSetData(-1, "Clinic 2|Clinic 3|Clinic 4") $button = GUICtrlCreateButton("Select", 10, 40, 60, 20) GUISetState(@SW_SHOW) While 1 $guibox = GUIGetMsg() Select Case $guibox = $button Select Case GUICtrlRead($combobox) = "Clinic 1" GUIDelete($list) Auto () EndSelect Case $guibox = $GUI_EVENT_CLOSE EndSelect WEnd EndFunc Func HowMany() Local $iMsg While 1 ;~ Turn input into a number $iBox = Number(InputBox ("Regestration", "How Many Patients are there total?")) ;~ If user enters a string or cancels then get them to try again If $iBox = 0 Then $iMsg = MsgBox(1,'Regestration', 'Please enter a valid number') If $iMsg = 2 Then Exit Else ExitLoop EndIf WEnd EndFunc Func Excel() While ProcessExists("EXCEL.EXE") $ms = MsgBox(5,"","Process error. You have an Excel sheet open. You must close it in order to let this program work. Please close it now.") If $ms=2 Then Exit ;~ Doesn't require sleep since the script is paused by the MsgBox above ;~ Sleep(250) WEnd ;~ Shouldn't use Global Scope inside functions moved to top of script Local $sExcelFile = FileOpenDialog("Choose/Create Excel File", @ScriptDir, "(*.xlsx)") If FileExists($sExcelFile) Then ;~ Shouldn't use Global Scope inside functions moved to top of script $oExcel = _Excel_Open () $oWorkbook = _Excel_BookOpen($oExcel,$sExcelFile) ;this will open the chosen xls file. Else $oExcel = _Excel_Open() $oWorkbook = _Excel_BookNew($oExcel, 2);this is here to create the xls file if it does not exist. EndIf EndFunc Func Auto() Local $aArray1 = _Excel_RangeRead($oWorkbook) ;~ If $iBox is greater than no. of rows in $aArray then $iBox equals the number of rows in $aArray If $iBox > (UBound($aArray1) - 1) Then $iBox = UBound($aArray1) - 1 For $i = 2 To UBound($aArray1) - 1 ;$i =0 Start from row A If $aArray1[$i][1] = "" Then Continueloop $sR0 = $aArray1[$i][0] ;status $sR1 = $aArray1[$i][1] ;Last Name $sR2 = $aArray1[$i][2] ;First Name $sR3 = $aArray1[$i][3] ;DOB $sR4 = $aArray1[$i][4] ;Sex $sR5 = $aArray1[$i][5] ;Mailling Address $sR6 = $aArray1[$i][6] ;Zip $sR7 = $aArray1[$i][7] ;Phone # $sR8 = $aArray1[$i][8] ;Visit Reason $sR9 = $aArray1[$i][9] ;Insurance $sR10 = $aArray1[$i][10] ;Clinic $sR11 = $aArray1[$i][11] ;Provider $sR12 = $aArray1[$i][12] ;Appt Time $sR13 = $aArray1[$i][13] ;Appt Date WinWaitActive ("Untitled - Notepad") ControlSend("Untitled - Notepad", "", "", $sR1 & ',' & $sR2 & @CR) $r += 1 If $r > $iBox Then Exit Dropdown () Next EndFunc so the second time I choose clinic 1 I want it to go to the next row which would be Champ brett in my example excel.
       
      Test.xlsx
      Example Format.xlsx
    • 31290
      By 31290
      Hi guys, 
      I'd like to write a piece of tool that would allow me to update a certain field in our Active Directory from a comma separated csv file composed like this:

      This file, automatically generated, can hold more than 10k lines.
      Thus, I need column A to be in one variable, column B in a second one and column C in a third one.
      I'm really missing this part as updating the AD is fairly easy once the 3 variable are populated. 
      I see things like this:
      Here's my attempts at the moment:
      #include <File.au3> #include <Array.au3> Global $csv_file = @DesktopDir & "\Book1.csv" Global $aRecords If Not _FileReadToArray($csv_file,$aRecords) Then MsgBox(4096,"Error", " Error reading log to Array error:" & @error) Exit EndIf For $x = 1 to $aRecords[0] Msgbox(0,'Record:' & $x, $aRecords[$x]) ; Shows the line that was read from file $csv_line_values = StringSplit($aRecords[$x], ",",1) ; Splits the line into 2 or more variables and puts them in an array ; _ArrayDisplay($csv_line_values) ; Shows what's in the array you just created. ; $csv_line_values[0] holds the number of elements in array ; $csv_line_values[1] holds the value ; $csv_line_values[2] holds the value ; etc Msgbox(0, 0, $csv_line_values[1]) Next Any help on this please? 
      Thanks in advance
      -31290-
    • StMaSi
      By StMaSi
      So, I have a text file like this...
      "Label", {left}, {top}, {width}, {height} "Label", {left}, {top}, {width}, {height} "Label", {left}, {top}, {width}, {height} "Label", {left}, {top}, {width}, {height} "Label", {left}, {top}, {width}, {height} What I'm attempting to do is read the data from this file, into an array, and use it to create checkboxes on a form like this...
      For $cb = 0 to 4 ; line numbers $Checkbox[$cb] = GUICtrlCreateCheckbox({label}, {left}, {top}, {width}, {height}) Next However, I can't figure out how to read the file into the array so as to be able to assign the data elements appropriately. I'm obviously missing something (or more than likely more than one something), but can't figure it out.
      Can anyone assist with this?
      Thanx.
       
    • dexto
      By dexto
      Why idea why would I get an error (Autoit Beta 3.3.15.0):
      Local $json[] Local $map[] $map['test'] = 'hello' Local $array[5] = [1, 2, 3, 4, 5] $json["data"] = $map $json["data"]["arr"] = $array ConsoleWrite($json["data"]["arr"][0] & @CRLF)  
    • cookiemonster
      By cookiemonster
      Im trying to read a JSON file into an array.
       
      The JSON looks like this:
       
      { "project_info": { "project_number": "123456789", "url": "https://www.website.com", "project_id": "PRJ08", "Bucket": "Buk09" }, "client": [ { "client_info": { "id": "1:1001306455", "info": { "name": "banana" } }, "oauth_client": [ { "client_id": "1001306455694-m3h6v", "client_type": 3 } ], "a_key": [ { "key": "dkldkdkd" } ], "Avail": { "ana": { "status": 1 }, "vit": { "status": 1, "other": [] }, "ad": { "status": 2 } } }, { "client_info": { "id": "1:1838346", "info": { "name": "orange" } }, "oauth_client": [ { "client_id": "2145696315633-dmdhe", "client_type": 3 } ], "a_key": [ { "key": "osikdme" } ], "Avail": { "ana": { "status": 1 }, "vit": { "status": 1, "other": [] }, "ad": { "status": 2 } } }, ], "configuration_version": "1" } What I want to do is read it all into one single large array, can anyone help? 
      All I have so far is:
      #include "JSON.au3" #include "array.au3" $file = fileread("C:\file.json") JsonToArray($file) Func JsonToArray($JSON) $JSON = StringRegExpReplace($JSON, "[\[\]{}]", "") $sBreak = StringSplit($JSON, ",") For $a = 1 To $sBreak[0] $t = _JSONDecode("{" & $sBreak[$a] & "}") _ArrayDisplay($t, "multi " & $a & " of " & $sBreak[0]) Next EndFunc ;==>JsonToArray