Документация по Clarion

       

REFER (было обращение к полю или нет)



REFER()

Функция REFER возвращает 1 (истина) если было обращение к последнему завершенному полю, или 0 (ложь) если обращения не было. Обращение происходит при вводе любого печатного символа, выборе поля OPTION или POINT или передвижении указателя в листбоксе. REFER возвращает истину, даже если в поле были введены те же символы, что и были в нем раньше.
Возвращаемый тип данных: LONG
Пример:
Screen SCREEN
ROW(4,13) ENTRY(@N4),USE(Fieldl) !Поле для ввода
ROW(5,13) ENTRY(@N4),USE(Field2) !Поле для ввода
ROW(6,13) ENTRY(@N4),USE(Field3) !Поле для ввода
ROW(7,13) ENTRY(@N4),USE(Field4) !Поле для ввода
.
CODE
LOOP
ACCEPT
CASE FIELD() !Управление редактированием
! полей
OF ?Field1 !Поле номер 1
IF Field1 = 0 ! если пусто,
BEEP ! звуковой сигнал
SELECT(?) ! и повторить ввод
.
OF ?Field4 !Поле номер 4
BREAK ! закончить цикл обработки
. . !Конец операторов CASE и LOOP



Содержание раздела