37.45.83.219 писал(а):
может вы старую версию под себя подпиливалиДа нет, вроде. Ладно, проверю. Да я особенно не подпиливаю ничего, кроме массива штрафов. Его неплохо бы вынести за пределы кода
------------ Дoбавленo в 10.25:
Гы... гы... гы. Точно, старая версия затесалась. Как новая прошла мимо меня, ума не приложу
------------ Дoбавленo в 10.31:
Сделал вот так
...
Tstate = (trace0, trace1, trace2, trace3, Body, Pin, Hwire, Vwire);
Tstates = set of Tstate; // содержимое матрицы объектов/состояний трассировки
//Tdirs =(dirR{Right}, dirD{Down}, dirL{Left}, dirU{Up});
{$INCLUDE constant.inc}
var
// Матрица объектов на схеме (обновляется перед каждой трассировкой)
...
И скопировал все константы в файл constant.inc. Теперь можно редактировать основной модуль, не трогая константы. У каждого constant.inc может быть свой.
Galkov, мне кажется, что это самый лучший вариант, чтобы не потерять свои настройки массива. А главный юнит можно будет допиливать дальше