С массива в число

[Mrbober]

Добрый день!!
Не подскажите как мне преобразователь массив в число.
Тобиш массив битовый 4, 5, 10, 2, 11 и число в ответе должно быть 4510211

В си указываешь массив и переменную, а как это в делфи сделать?!!

[VadikV]

Что сложного то?????

s := m[1]; - первое значение из массива
for i := 2 to по количеству элементов массива begin
   if m[i-1] < 10 then s := s * 10;
   else if m[i-1] < 100 then s := s * 100;
   s := s + m[i];
end;

[JUDAS]

vadikV по ходу ему нужно не собрать с цифр число, а чтото доругое
4, 5, 10, 2, 11 > 4510211
По ходу тут лучше пользоватся следущим кодом:
S:='';
for i:=0 to LenGth(Massiv)-1 do
S:=S+inttostr(Massiv);
резултат = StrToInt или STrToInt64 от S.
Или вариант 2, если ему нужно числа читать как сплошной дамп, тогда:
A : array[0..4] of byte = (4, 5, 10, 2, 11);
B : word;
C : cardinal;
B:= PWord(@A[0])^; = 1284
C:= PCardinal(@A[0])^; = 34211076