чтение массива в цикле

[Игорь Кулакевич]

заполняю массив переменной длинны в этом цикле(я там кучу остального еще делаю, ну):

for i := 1 to ((lopknd*2)+1) do begin
doc.ksLineSeg(kndxi,kndvhDvt,kndxi, kndvhDnar,1);
kndxi:=kndxi+(kndli);
kndArray[i]:=roundTo(kndli,-2);
kndli:=kndli-(kndshag/kmd);
label25.Caption:=label25.Caption+' '+'('+(floattostr(kndArray[i])+')');
end;

последней строчкой проверяю все ли элементы созданы- тут все ок:
13,88 13,21 12,55 11,88 11,21 10,55 9,88 9,21 8,55 7,88 7,21 6,55 5,88
как только начинаю читать этот массив в цикле:

for i := 1 to (lopknd*2+1) do begin
s:=s+' '+floattostr(kndarray[i]);
memo1.Lines.Text:=s;
end;

13,88 13,21 12,55 11,88 11,21 10,55 9,88 9,21 8,55 7,88 7,21 6,55 1,46559435264895E-305
в чем может быть проблема?

[ByAlex]

Если вы используете динамический массив, то нумерация там с нуля! Используйте DeBug, там все понятно!

[Sweta]

Думаю, что первый индекс массива д.б. 0 , а не 1. Выходите за пределы.

[Abstraction]

Вам никто не говорил, что у Вас очень понятные имена переменных? Ну, и я не скажу.

последней строчкой проверяю все ли элементы созданы- тут все ок:
13,88 13,21 12,55 11,88 11,21 10,55 9,88 9,21 8,55 7,88 7,21 6,55 5,88

Это текст label27.Caption? Если да, то где скобки?