Вверх ↑
Разработчик
Ответов: 26113
Рейтинг: 2126
#1: 2013-02-22 10:41:31 ЛС | профиль | цитата
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, мне кажется, что это самый лучший вариант, чтобы не потерять свои настройки массива. А главный юнит можно будет допиливать дальше

карма: 22

0