(906)764-3094ПН-СБ с 10:00 до 18:00
We speak English

6.5. Замечания

Более простая для пользователя программа фактически сохранит существующую формулу для F0, если она существует, и восстановит ее, чтобы пользователь не потерял ранее сохраненные формулы после запуска программы. Для этого можно сделать следующее:

Код:

LOCAL oldfunc = ""; // тип данных - строка
IFERR
oldfunc := STRING(F0);
THEN
  oldfunc := "";
END;

Системное прерывание вследствие обнаружения ошибки нужно для учета вероятности, что ранее существующей формулы F0 нет. Мы восстанавливаем старую формулу пользователя F0 с помощью:

F0 := oldfunc;

К счастью, это работает даже в том случае, когда oldfunc - это пустая строка.