Тема: Ошибка
Показать сообщение отдельно
  #4  
Старый 10.01.2007, 17:00
Аватар для Decoding
Decoding Decoding вне форума
Местный
 
Регистрация: 03.06.2006
Адрес: Почту найдете на моем сайте
Сообщения: 576
Версия Delphi: D10.2
Репутация: 214
По умолчанию

1) Нифига не понял что делает программа…
2)
Цитата:
Solve(number,View,j,0);
//Почему то number и view остаются не постоянными
Потому что в процедуре Solve ты делаешь
ClonNum[l]:=p; // ClonNum:Num = @number
ClonView[p]:=1; // ClonView:Num = @view
3)
Цитата:
EndNum:=ClonNum; //У меня здесь даже можно и не присваивать
Естественно! В процедуре Init ты делаешь endnum:=number; Т.к. твои массивы динамические, то этим действием ты копируешь в EndNum указатель (ссылку) на ClonNum. То есть и EndNum и ClonNum указывают на одну область памяти…
Ответить с цитированием