Цитата:
Сообщение от Светик123
заработало)) спасибо огромное
|
Уф!!!
P.S. Подозреваю, что проблема была в строке
until Not(LeftBorder(StepX)) or KeyPressed;
Дело в том, что если, допустим, есть некая булева переменная
bu, то отрицание может быть задано двояко: либо
not bu, либо
not(bu) - в этом случае "
not" выступает, как встроенная функция.
Так вот, обоим моим Паскалям это дело пофиг - как нравится, так и пиши, а вот некоторые реализации воспринимают только один из вариантов. Возможно, в этом и была закавыка. В последнем варианте программы я вообще выбросил функцию
LeftBorder.