CHOICE (относительная позиция элемента)
CHOICE([field])
EQUATE-метка поля типа LIST, OPTION, POINT. |
Функция CHOICE возвращает порядковый номер выбранного элемента в структуре OPTION, LISTбоксе или поля POINT. Будучи вызвана без параметров, CHOICE возвращает порядковый номер выбранного элемента в последнем LIST, OPTION или POINT, завершенном оператором ACCEPT.
CHOICE возвращает порядковый номер выбранной RADIO-кнопки или поля типа STRING в структуре OPTION. Порядковый номер элемента, это его относительная позиция от начала описания структуры. Первый элемент имеет порядковый номер 1, второй - 2 и т.д.
CHOICE возвращает номер элемента очереди (QUEUE), выбранного из листбокса.
CHOICE возвращает позицию указателя (POINT) в REPEAT-структуре, при завершении POINT-поля. Это же значение возвращает индексная переменная (INDEX) REPEAT-структуры.
Возвращаемый тип данных: LONG
Пример:
Screen SCREEN
ROW(4,13) OPTION,USE(MenuField),REQ !Структура меню
ROW(5,13) STRING('Добавить запись') ! элемент 1
ROW(7,13) STRING('Изменить запись') ! элемент 2
ROW(9,13) STRING('Удалить запись') ! элемент 3
ROW(11,18) STRING('Выход') ! элемент 4
.
CODE
LOOP
ACCEPT
EXECUTE CHOICE() !В зависимости от выбранного элемента
! выполнить то или иное действие:
AddRec ! добавить запись
PutRec ! просмотреть/изменить запись
DelRec ! удалить запись
RETURN ! закончить работу
. .