Что нового

[Массивы] аналог php implode в autoit

ArgoNaft

Новичок
Сообщения
129
Репутация
0
не могу найти, аналог php implode в autoit
помогите пожалуйста
 

Garrett

Модератор
Локальный модератор
Сообщения
3 999
Репутация
964
А чего её искать, напишите сами :smile:
Код:
Dim $aData[3] = ['Test', 'Autoit', 'implode function!']

ConsoleWrite(_Implode($aData) & @CRLF)

Func _Implode($a_Data, $s_Glue = ' ')
	
	Local $s_Tmp = ''
	
	If Not IsArray($a_Data) Then
		Return SetError(1, 0, 0)
	Else
		For $i = 0 To UBound($a_Data) -1
			$s_Tmp &= $a_Data[$i] & $s_Glue 
		Next
	EndIf
	
	Return SetError(0, 0, StringTrimRight($s_Tmp, 1))
EndFunc;==>_Implode
 

Z_Lenar

Продвинутый
Сообщения
209
Репутация
52
Код:
#include <Array.au3>

Dim $arr[3] = ["1", "2", "3"]
MsgBox(0, "", _ArrayToString($arr, ";"))
 
Верх