ошибка в библиотеке array.au3

[VermanVendetta13]

посмотрите пожалуйста, сам библиотеку трогать побаиваюсь, при запуске скрипта, появляется новым окном в редакторе и пишет об ошибке

 

[MaximK]

Покажите сам скрипт где выскакивает ошибка

 

[madmasles]

VermanVendetta13
Это старая UDF для версий 3.2.10+. В современных версиях она работать не будет (не должна). Самое лучшее удалите ее и используйте ту, которая в комплекте.

 

[VermanVendetta13]

VermanVendetta13
Это старая UDF для версий 3.2.10+. В современных версиях она работать не будет (не должна). Самое лучшее удалите ее и используйте ту, которая в комплекте.

Так весь прикол и заключается в том что она комплектная. Не можете мне скинуть новую?

 

[IgRo]

; *****************************************************************************************
; Пример 3 - Объявляем одномерный массив, содержащий одинаковые значения.
; Используйте _ArrayUnique и учёт регистра, чтобы создать новый массив, содержащий только уникальные значения.
; *****************************************************************************************
#include <Array.au3>

Dim $aArray[6][2] = [[1, "A"],[2, "B"],[3, "C"],[1, "a"],[2, "b"],[3, "c"]]
_ArrayDisplay($aArray, "$aArray")
$aNewArray = _ArrayUnique($aArray, 1, 0, 1) ; Используются параметры по умолчанию, с учётом регистра
_ArrayDisplay($aNewArray, "$aNewArray возвращает первую размерность массива $aArray")

$aNewArray = _ArrayUnique($aArray, 2, 0, 1) ; Используются параметры по умолчанию, с учётом регистра
_ArrayDisplay($aNewArray, "$aNewArray возвращает вторую размерность массива $aArray")

В версиях Array.au3: 3.3.13.20, 3.3.15.0 выдаёт ошибку

"C:\program files\autoit3\Include\Array.au3" (2308) : ==> Array variable has incorrect number of subscripts or subscript dimension range exceeded.:
If IsInt($aArray[$iBase]) Then
If IsInt(^ ERROR

В 3.3.12.0 - работает

 

[inververs]

Ничего удивительного, это уже не первый раз когда в этой библиотеке встречаются такие тупые ошибки.


Добавлено:

Сообщение автоматически объединено: 19 Авг 2015

оформил тикет.

 

[InnI]

inververs

оформил тикет

Уже исправлено: #3078

IgRo

выдаёт ошибку

Исправление: Problem with _ArrayUnique

 

[inververs]

не заметил.

 

[CreatoR]

Поправка:

; Autocheck of first element
	If $iIntType = $ARRAYUNIQUE_AUTO Then
		Local $vBase = ($iDims = 1 ? $aArray[$iBase] : $aArray[$iBase][0])
		
		If IsInt($vBase) Then
			Switch VarGetType($vBase)
				Case "Int32"
					$iIntType = $ARRAYUNIQUE_FORCE32
				Case "Int64"
					$iIntType = $ARRAYUNIQUE_FORCE64
			EndSwitch
		Else
			$iIntType = $ARRAYUNIQUE_FORCE32
		EndIf
	EndIf

 

[IgRo]

Спасибо
исправил