Команда GETEXPR

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

Синтаксис:

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Тип выражения
CCharacter
DDate
TDateTime
NNumeric
FFloat
IInteger
BDouble
YCurrency
LLogical

Можно задать сообщение об ошибке 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

Предыдущий Шаг | Следующий Шаг | Оглавление
Автор Каев Артем - 26.01.2003