Вверх ↑
Ответов: 1429
Рейтинг: 50
#1: 2011-10-07 00:49:23 ЛС | профиль | цитата
ПОлучилось вот так )

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:
Может можно было замутить динамический массив, если бы я знал как на делфи это выглядит?
карма: 0

0
файлы: 1code_25392.txt [1.9KB] [166]