Восстановить пути

Здравствуйте, что-то подзабыл, как можно обойти такую ошибку, что программа не находит пути к процедуре
Когда в меню запускаешь пункт 2222, который запускает программу curl, то запуская пункт 11111 выходит сообщение , что файл pr1.prg не существует, чё то curl чистит в памяти.
Куда то надо записывать и восстанавливать переменные наверное..
[code]SET SYSMENU OFF
DEFINE MENU _MSYSMENU BAR IN SCREEN
DEFINE PAD p1 OF _MSYSMENU PROMPT "1111" COLOR SCHEME 3
ON SELECTION PAD p1 OF _MSYSMENU DO pr1
DEFINE PAD p2 OF _MSYSMENU PROMPT "22222" COLOR SCHEME 3
ON SELECTION PAD p2 OF _MSYSMENU DO pr2
DEFINE PAD fp OF _MSYSMENU PROMPT "FP" COLOR SCHEME 3
ON SELECTION PAD fp OF _MSYSMENU DO p_fp
SET SYSMENU AUTOMATIC
RETURN
PROCEDURE pr1
MESSAGEBOX("pr1")
return
PROCEDURE pr2
!curl --help
RETURN
PROCEDURE p_fp
CLEAR EVENTS
SET SYSMENU TO DEFAULT
ACTIVATE WINDOW "command"
RETURN[/code]

0

Автор публикации

Пользователи не найдены
Оставить комментарий
Авторизация
*
*
Генерация пароля