
code_25392.txt
И работает, щас буду пробовать размеры проверять.
------------ Дoбавленo в 00.43:
Работает, 65 000 значений, пишет и читает. (больше не проверял

Код элемента:
#hws
func Init
lang(arr:array)
if(isndef(Numbers))
fvar(s, n, i, old)
s = Numbers
if(_arr.count(s))
for(i = 0; i < _arr.count(s); i++)
n &= s[i][0]
end
s = _arr.join(n, ',')
else
s = ''
end
lng.decl_priv_var(arr, 'array[0..65000] of integer')
end
sub(arr, 13 & 1)
end
func Array()
return(arr)
end
Нужный размер массива надо будет в проперти загнать.
Ура! Товарищи!
------------ Дoбавленo в 00.49:
Может можно было замутить динамический массив, если бы я знал как на делфи это выглядит?