Вниз
Скачать: CL | DM;

тайна покрытая мраком   Найти похожие ветки 

← →
Ghost! ©   (2002-11-06 16:20) [0]

Уже третий день мучусь, не могу понять, почему этот код вызывает access violation:

SetLength(massiv, a+1);
b:=0;
Repeat
Inc(b);
massiv[b]:=Random(c);
Until b=d;
massiv[b+1]:=0;


← →
Skier ©   (2002-11-06 16:22) [1]

>Ghost!
1) Что есть massiv (array of integer) ?
2) Что есть d ?


← →
NP-237 ©   (2002-11-06 16:23) [2]

d>a


← →
LongIsland ©   (2002-11-06 16:29) [3]

SetLength(massiv, b+1);
b:=0;
Repeat
Inc(b);
massiv[b]:=Random(c);
Until b=d;
massiv[b+1]:=0

или

SetLength(massiv, a+1);
b:=0;
Repeat
Inc(b);
massiv[b]:=Random(c);
Until b=a;
massiv[b+1]:=0

кажись так...


← →
KoluChi ©   (2002-11-06 16:29) [4]

access violation однозначно из-за обращения к несуществующему индексу в массиве


← →
LongIsland ©   (2002-11-06 16:30) [5]

нет не так

massiv[b+1]:=0
вообще выкинуть


← →
Skier ©   (2002-11-06 16:30) [6]

>Ghost!
Skier © (06.11.02 16:22) +
3) Что есть a ?


← →
Ghost! ©   (2002-11-06 16:39) [7]

Да, код действительно был выдернут из контекста и был не совсем понятным, прошу прощения. Но теперь всё работает: просто первую строчку я изменил на
SetLength(errornow, errorcount+2);
Спасибо


← →
AlexT1000   (2002-11-06 17:16) [8]

для справки . динамические массивы индексируются с нуля , а не с одного как у тебя.

второе

лучше делать так
for i:=0 to High(Massiv) do .......



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.015 c
6-59322
AlexBeliy
2002-09-04 15:41
2002.11.18
Есть ли машина в сети


3-58994
AKondor
2002-10-28 20:33
2002.11.18
Как организовать обмен данными в InterBase ?


1-59174
Ag2002
2002-11-09 11:16
2002.11.18
Логика


14-59370
iNew
2002-10-30 07:13
2002.11.18
Проинсталировал Delphi_6.0, инсталаяция прошла успешно, а


3-59062
Ghost-Kasper
2002-10-30 12:13
2002.11.18
Как можно даставать данные из Excel, не преобразовывая их в друго




   Наверх