AutoIt v3.3.13.4 Beta

[mesale0077]

Func _FileListToArrayRec($sInitialPath, $sMask = "*", $iReturn = 0, $iRecur = 0, $iSort = 0, $iReturnPath = 1)
    ($sInitialPath, $sMask = "*", $iReturn = 0, $iRecur = 0, $iSort = 0, $iReturnPath = 1)


C:\Program Files\AutoIt3\Beta\Include\File.au3"(101,16) : error: unbalanced paranthesis expression.

[guinness]

Yeah agreed. I liked your post on function references.

[Melba23]

mesale0077,

Thanks - stupid copy-paste now fixed.

M23

[mLipok]

  On 7/15/2014 at 7:21 PM, Melba23 said:

FaridAgl,

And please keep testing the feature yourself. New people testing always come up with new ideas which can cause problems - so do not hesitate to let Jon know if you think you have found any.

M23

 

Where is the best place to post issues related to experimental feature ?

Actualy I use one that feature in my production scripts (using ActiveX COM object with out registering I mean my UDF: Debenu and XZip)

But I can easily change this in any case.

[guinness]

Just post here for now and not in Trac with this feature.

[FaridAgl]

I guess some modification in Au3Check is required:

Global Const $tblPerson[]
$tblPerson.FirstName = "Farid"

Also here is a snippet which I guess it will give you some idea about how useful this new feature could be:

Global $tblApple[]
$tblApple.Name = "Apple"
$tblApple.Color = "Blue"
$tblApple.Price = 10

Global $tblOrange[]
$tblOrange.Name = "Orange"
$tblOrange.Color = "Green"
$tblOrange.Price = 7

Global $tblBanana[]
$tblBanana.Name = "Banana"
$tblBanana.Color = "Red"
$tblBanana.Price = 13

Global $tblFruits[]
$tblFruits.Apple = $tblApple
$tblFruits.Orange = $tblOrange
$tblFruits.Banana = $tblBanana

For $tblFruit In $tblFruits
    For $vProperty In $tblFruit
        ConsoleWrite($vProperty & @CRLF)
    Next
    ConsoleWrite(@CRLF)
Next

Edit:

Seems like With...EndWith would also be modified a bit:

  Quote

Used to reduce long references to dot-accessible type of variables.

Edited July 15, 2014 by FaridAgl

[Melba23]

FaridAgl,

 

  Quote

Seems like With...EndWith would also be modified a bit

Do not hold your breath - a comment from Jon during the testing today:

  Quote

With / EndWith doesn't work though. It's probably not going to be feasible to get to work easily either

M23

[guinness]

On a related note (pardon the pun) I just fixed an issue with the documentation adding () to $tagRECT e.g. in _WinAPI_GetClientRect(). I think by now people understand I don't like updating the build scripts.

[FaridAgl]

Melba23,
OK, thanks, that's wouldn't be problem.

Ummm, who is in charge for Au3Check?

[Melba23]

FaridAgl,

Au3Check is maintained by Jos and jpm - but until Jon settles on the final syntax for this new datatype they will go nowhere near it!

M23

[guinness]

  On 7/15/2014 at 7:52 PM, FaridAgl said:

Ummm, who is in charge for Au3Check?

jpm is I believe from the dicussions that have happened in the past.

Edit: Damn, Melba23 beat me!

Edited July 15, 2014 by guinness

[Melba23]

guinness,

Aha! Gotcha at last!

M23

[FaridAgl]

I guess I won't touch Enum anymore (did you get it?).

Edited July 15, 2014 by FaridAgl

[guinness]

  On 7/15/2014 at 7:58 PM, FaridAgl said:

I guess I won't touch Enum anymore (did you get it?).

Yes, lame! -_0

[FaridAgl]

Before:

Global Enum $RESULT_FAILURE, $RESULT_SUCCESS, $RESULT_EXISTS, $RESULT_NOTEXISTS, $RESULT_INVALID, $RESULT_EMPTY

After:

Global Const $enmResult[]
$enmResult.Failure = 1
$enmResult.Success = 2
$enmResult.Exists = 3
$enmResult.NotExists = 4
$enmResult.Invalid = 5
$enmResult.Empty = 6

[guinness]

I prefer the first choice still (even though it looks like a struct in C#) because I can use PreExpand. Also you need to remove Const as AutoIt displays a warning. Use 

#AutoIt3Wrapper_Run_Au3Check=N at the top of the script to see it's no Au3Check this time.

[mLipok]

I do some checking.

Very nice new feature.

here are my repro:

Dim $var[]
$var["hello1"] = "1111"
$var["HELLO1"] = "1111 - CAPS"
$var.hello2 = "2222"
$var[3] = "3333"
$var.Append("4444")

MsgBox(0, "Exists - $var[5] = " & $var[5], $var.Exists("keys"))
MsgBox(0, "Exists - keys", $var.Exists("keys"))

$var.keys = "5555"
MsgBox(0, "Exists - $var[5] = " & $var[5], $var.Exists("keys"))
MsgBox(0, "Exists - keys", $var.Exists("keys"))

how you can see I sepcialy use a keyword "keys" as a name of key.

Keyword .Exists work well

but $var[5] always return emtpy string.

[FaridAgl]

  Quote

 

I prefer the first choice still (even though it looks like a struct in C#) because I can use PreExpand

Agreed.

  Quote

 

Also you need to remove Const as AutoIt displays a warning. Use

I will use this new kind of enumeration after when Au3Check has modified!

[guinness]

  On 7/15/2014 at 8:27 PM, FaridAgl said:

Agreed.

I will use this new kind of enumeration after when Au3Check has modified!

The warning is an AutoIt warning too, not just Au3Check.

See, you can't even do it with arrays.

Local Const $aArray[10]
$aArray[0] = 0
$aArray[1] = 1

[mLipok]

  On 7/15/2014 at 7:38 PM, FaridAgl said:

Global $tblApple[]
$tblApple.Name = "Apple"
$tblApple.Color = "Blue"
$tblApple.Price = 10

Global $tblOrange[]
$tblOrange.Name = "Orange"
$tblOrange.Color = "Green"
$tblOrange.Price = 7

Global $tblBanana[]
$tblBanana.Name = "Banana"
$tblBanana.Color = "Red"
$tblBanana.Price = 13

Global $tblFruits[]
$tblFruits.Apple = $tblApple
$tblFruits.Orange = $tblOrange
$tblFruits.Banana = $tblBanana

For $tblFruit In $tblFruits
    For $vProperty In $tblFruit
        ConsoleWrite($vProperty & @CRLF)
    Next
    ConsoleWrite(@CRLF)
Next

Very nice example.

My checking based on your examples

Global $tblApple[]
$tblApple.Name = "Apple"
$tblApple.Color = "Blue"
$tblApple.Price = 10

Global $tblOrange[]
$tblOrange.Name = "Orange"
$tblOrange.Color = "Green"
$tblOrange.Price = 7

Global $tblBanana[]
$tblBanana.Name = "Banana"
$tblBanana.Color = "Red"
$tblBanana.Price = 13

Global $tblFruits[]
$tblFruits.Apple = $tblApple
$tblFruits.Orange = $tblOrange
$tblFruits.Banana = $tblBanana

For $tblFruit In $tblFruits
    For $key In $tblFruit.Keys()
        ConsoleWrite($key & ' = ' & $tblFruit[$key] & @CRLF)
    Next
    ConsoleWrite(@CRLF)
Next