Отображает диалоговое окно построителя выражений, в котором можно создать выражение и сохранить его в переменной памяти или в элементе массива.

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.

Expand imageПример

В следующем примере команда GETEXPR используется для получения выражения надлежащего типа для команды LOCATE. Если команда LOCATE выполняется успешно, отображается название компании; в противном случае выдается соответствующее сообщение.
  CopyCode imageCopy Code
CLOSE DATABASES
OPEN DATABASE (HOME(2) + '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

Expand imageСмотрите также