Регистрация

С чего начать?

Обсуждение вопросов по разработке программ в среде продуктов копорации "Progress Software"
Новичок
Сообщения: 8
Зарегистрирован: Вт авг 16, 2016 5:49 pm

С чего начать?

Сообщение sega1999 » Чт авг 18, 2016 12:33 pm

Народ, я человек в PROGRESS новый, поэтому не бейте.
Нужно в окне по кнопке F2 вызвать диалоговое окно с запросом на фильтрацию по полям.
Объясните с чего начать и в какой последовательности.
Работаем через TELNET с UNIX.

Администратор
Аватара пользователя
Сообщения: 1871
Зарегистрирован: Пт мар 25, 2005 6:05 pm
Откуда: Progress Technologies

Re: С чего начать?

Сообщение Arelav » Чт авг 18, 2016 3:20 pm

Не уверен, что в терминальной сессии получится перехватить F2, эта клавиша нацелена на help ($DLC/src/applhelp.p), но в win работает такой код:

Код: Выделить всё
DEFINE VARIABLE act AS CHARACTER NO-UNDO.
DEFINE FRAME f1 WITH SIZE 78 BY 3.

act = "Action".
PROCEDURE Action:
    Message LAST-EVENT:LABEL view-as alert-box. /* здесь использовать любой необходимый код*/
END.

ON "F2" ANYWHERE
DO:
  RUN VALUE(act).
  RETURN.
END.

ENABLE ALL WITH FRAME f1.
WAIT-FOR CLOSE OF CURRENT-WINDOW.


Если у вас в терминале это не сработает, то можно попробовать заменить на какую-нибудь другую комбинацию клавиш. Например CTRL-F

Код: Выделить всё
ON "CTRL-F" ANYWHERE
DO:
  RUN VALUE(act).
  RETURN.
END.

Новичок
Сообщения: 8
Зарегистрирован: Вт авг 16, 2016 5:49 pm

Re: С чего начать?

Сообщение sega1999 » Чт авг 18, 2016 3:22 pm

Спасибо!!! Будем разбираться!!!

Вернуться в PROGRESS - 4GL - ПРОГРАММИРОВАНИЕ

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 7