Форум: "Основная";
Текущий архив: 2003.12.12;
Скачать: [xml.tar.bz2];
ВнизArray Найти похожие ветки
← →
Clift (2003-12-01 16:06) [0]...
var
...
mas:array of integer;
...
procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
n:integer;
begin
setlength(mas,1);
label1.Caption:="В массиве "+inttostr(length(mas))+" елем." ;
form1.Label1.Caption:=form1.Label1.Caption+#13+"0-> "+inttostr(mas[0]);
form1.Label1.Caption:=form1.Label1.Caption+#13+"1-> "+inttostr(mas[1]);
form1.Label1.Caption:=form1.Label1.Caption+#13+"2-> "+inttostr(mas[2]);
form1.Label1.Caption:=form1.Label1.Caption+#13+"3-> "+inttostr(mas[3]);
form1.Label1.Caption:=form1.Label1.Caption+#13+"100-> "+inttostr(mas[100]);
n:=mas[100];
form1.Label1.Caption:=form1.Label1.Caption+#13+"n= "+inttostr(mas[100]);
end;
end.
если нажать только один раз то результат такой:
0-> 0 //это понятно , а дальше...
1-> 18
2-> 1
3-> 1
100-> -521396030
n= -521396030
при каждом нажатии изменяются mas[1],mas[2],mas[3]
а вопрос такой : почему это работает? ведь длинна массива
только один елемент (setlength(mas,1))следовательно существует только
mas[0] а остальных недолжно быть.(см.n:=mas[100]-работает).
И что это за числа, откуда они?
p.s.
задачу использованя массива в программе я решил,но вопрос остался.
← →
Македонеца (2003-12-01 16:10) [1]Интересный вопроc:)
Это действительно так
← →
Тимохов (2003-12-01 16:14) [2]range check error включите
← →
Вованчик (2003-12-01 16:14) [3]
> И что это за числа, откуда они?
из памяти - просто лезешь в чужой кусок памяти, где содержаться данные не массива
← →
Тимохов (2003-12-01 16:15) [4]Откуда числа?
Случайный мусор в памяти
← →
Clift (2003-12-01 16:21) [5]Тимохов (01.12.03 16:14) [2]
range check error включите
а как его включить?
ну незнаю я!
← →
Тимохов (2003-12-01 17:21) [6]Чтите help по ключевым словам "range check error".
У меня 5 dephi - сразу нашлось.
← →
Ru (2003-12-01 17:31) [7]а у меня такая фишка стабильно ав выдаёт (только своя)
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.12.12;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.009 c