Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.11.18;
Скачать: 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 вся ветка

Текущий архив: 2002.11.18;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.016 c
14-59338
N A N
2002-10-29 09:01
2002.11.18
Есть ли сертификация по Дельфи?


3-59058
max2057
2002-10-30 13:53
2002.11.18
Репликация Oracle ов


14-59381
Эльф
2002-10-30 12:53
2002.11.18
SUIPack


8-59289
easy
2002-07-29 18:29
2002.11.18
TCustomLabel.Canvas


6-59319
Dash
2002-09-20 18:18
2002.11.18
Где хранитса информация о соединениях в Internet Explorer-е и можно ли её перенасить с компа на комп