Отображает диалоговое окно построителя выражений, в котором можно создать выражение и сохранить его в переменной памяти или в элементе массива.
Синтаксис:
GETEXPR [cCaptionText] TO MemVarName [TYPE cExpressionType [; cErrorMessageText]] [DEFAULT cDefaultExpression]
Параметры:
cCaptionText
Задает надпись, которая появится в конструкторе выражений. Эта надпись должна напоминать пользователю о том, какого рода выражение следует построить.
TO MemVarName
Задает переменную памяти или элемент массива, в котором сохраняется данное выражение. Если такой переменной памяти еще не существует, Visual FoxPro создаст ее. Команда GETEXPR не может создать элемент массива.
Если выйти из конструктора выражений, нажав клавишу Esc или кнопку Cancel, в заданную переменную памяти или элемент массива будет записана пустая строка. Если выражение создается по умолчанию с помощью предложения DEFAULT, то при выходе из конструктора выражений нажатием клавиши Esc или кнопки Cancel в переменную памяти или элемент массива записывается выражение, созданное по умолчанию.
TYPE cExpressionType [; cErrorMessageText]
Задает тип выражения. В следующей таблице перечислены символы, которые можно задавать в качестве cExpressionType, и соответствующие им типы выражений:
cExpressionType | Тип выражения |
---|---|
C | Character |
D | Date |
T | DateTime |
N | Numeric |
F | Float |
I | Integer |
B | Double |
Y | Currency |
L | Logical |
Можно задать сообщение об ошибке cErrorMessageText, которое будет выдаваться, когда выражение окажется недопустимым. Если текст сообщения cErrorMessageText указывается вместе с типом выражения cExpressionType, эти два аргумента следует разделить точкой с запятой (;). Вся комбинация, состоящая из cExpressionType, точкой с запятой и cErrorMessageText, должна быть заключена в кавычки (одиночные или двойные).
DEFAULT cDefaultExpression
Позволяет отображать в конструкторе выражений первоначальный вариант выражения, предлагаемый про умолчанию. Вы можете принять существующее выражение, используемое по умолчанию, или заменить его собственным, задав его в качестве cDefaultExpression. Выражение cDefaultExpression сохраняется в переменной памяти или элементе массива, если вы выходите из конструктора выражений, нажимая клавишу Esc или кнопку Cancel.
Пример:
* В следующем примере команда GETEXPR используется для получения * выражения надлежащего типа для команды LOCATE. Если команда * LOCATE выполняется успешно, отображается название компании; в * противном случае выдается соответствующее сообщение. CLOSE DATABASES OPEN DATABASE (HOME( ) + 'samples\data\testdata') USE customer && Opens Customer table GETEXPR 'Enter condition to locate ' TO gcTemp; TYPE 'L' DEFAULT 'COMPANY = ""' LOCATE FOR &gcTemp IF FOUND( ) DISPLAY ELSE ? 'Condition ' + gcTemp + ' was not found ' ENDIF