Платные хостинги     Раскрутка сайта     Книги по программированию

Непонятки с динамич.массивами

- СУть приводимого ниже куска проги: имеется текст.файл. Каждая строка которого загоняется в свой динам.массив (Dhi_FlexibleArray, Lck_FlexibleArray .... : array of Real). Заранее неизвестно кол-во записей в строке. Беру заведомо больший пост. массив (q: array[0..40] of real), определяю кол-во записей в каждой строке, задаю размер динам. массива и загоняю в него значения. case NomerStroki of 998: begin SetLength(Dhi_FlexibleArray, i+1); for i2 := 0 to i+1 do Dhi_FlexibleArray[i2] := q[i2]; // ПРИМЕЧ. Size_Dhi_FlexibleArray := i+1; end;ЗДЕСЬ ОШИБКА ВЫЛЕЗАЕТ [access violantion at 0x00406315: write to adres 0x00030e70] 999: begin {procedure Line999;} SetLength(Lck_FlexibleArray, i+1); Size_Lck_FlexibleArray := i+1; for i1 := 0 to i+1 do Lck_FlexibleArray[i1] := q[i1]; end;Если убрать строку //ПРИМЕЧ., то все работает без заполнения первого динам.массива. Может кто подскажет чего? Заранее благодарен, leyftd@smtp.ru

- Привет. Индексация элементов в динамичечком массиве начинается с нуля. Следовательно, если ты установил размер i+1, то номер последнего элемента i. А если укажешь далее то ошибка

Интернет казино     Онлайн игры     Увеличение члена     Купить DVD