Stringbuilder Functionality

[JRSmile]

I have missed the stringbuilder functionality from VB.NET inautoit so i added a little UDF to easily add strings together.

every call of _adstr() adds the given variable to the string. If _adstr() is called without arguments the string will be returned and deleted.

#region examples
_adstr("1")
_adstr("1")
_adstr("1")
ConsoleWrite(_adstr())
_adstr("2")
_adstr("3")
_adstr("4")
ConsoleWrite(_adstr())
_adstr("5")
_adstr(@CRLF & @ComputerName & @CRLF)
_adstr("6")
ConsoleWrite(_adstr())
#endregion

Func _adstr($text = "")
    if $text = "" Then
        $tmp = Eval("adstr_var")
        Assign("adstr_var","")
        Return $tmp
    EndIf
    Assign("adstr_var",Eval("adstr_var") & $text,2)
    Return Eval("adstr_var")
EndFunc

[poisonkiller]

Nice script! But wouldn't it be less code this way:

#region examples
$str = "1"
$str &= "1"
$str &= "1"
ConsoleWrite($str)
$str = "2"
$str &= "3"
$str &= "4"
ConsoleWrite($str)
$str = "5"
$str &= @CRLF & @ComputerName & @CRLF
$str &= "6"
ConsoleWrite($str)
#endregion

[ConsultingJoe]

Nice script! But wouldn't it be less code this way:

#region examples
$str = "1"
$str &= "1"
$str &= "1"
ConsoleWrite($str)
$str = "2"
$str &= "3"
$str &= "4"
ConsoleWrite($str)
$str = "5"
$str &= @CRLF & @ComputerName & @CRLF
$str &= "6"
ConsoleWrite($str)
#endregion

yes it would

[JRSmile]

yes it would

yes but you can alter the function to add for example @CRLFs to it and you have an easy formatting solution for mass output of strings.

i just wanted to demonstrate that you don't need to have to register a variable for every kind of stuff

[marcusawerly]

On 6/9/2007 at 8:43 AM, poisonkiller said:

Nice script! But wouldn't it be less code this way:

 

#region examples
$str = "1"
$str &= "1"
$str &= "1"
ConsoleWrite($str)
$str = "2"
$str &= "3"
$str &= "4"
ConsoleWrite($str)
$str = "5"
$str &= @CRLF & @ComputerName & @CRLF
$str &= "6"
ConsoleWrite($str)
#endregion

Thanks for this.  I know it is super duper old, but it was helpful even today.