Сохраняет данные в переменной памяти, массиве или в элементе массива.

STORE eExpression TO VarNameList | ArrayNameList-or-
VarName | ArrayName = eExpression

Параметры

eExpression

Задает выражение, значение которого записывается в переменную памяти, массив или элемент массива. Если переменной памяти не существует, она создается и инициализируется значением eExpression. Массив необходимо предварительно определить с помощью команды DIMENSION. Содержимое существующей переменной памяти, массива или элемента массива команда STORE замещает новым значением.

VarNameList

Задает список переменных памяти или элементов массива, в которых сохраняется значение eExpression. Имена элементов массива следует разделять запятыми.

ArrayNameList

Задает список имен существующих массивов, в которых сохраняется значение eExpression. Разделяйте имена массивов запятыми.

Если установка SET COMPATIBLE имеет значение OFF, команда STORE инициализирует каждый элемент в этих массивах заданным значением. Если действует SET COMPATIBLE ON, команда STORE сохраняет заданное значение в переменных памяти, записывая его поверх содержимого существующих массивов с теми же именами.

Expand imageПримечания

Альтернативным вариантом команды STORE является оператор присваивания в виде знака равенства (=). Переменная памяти, массив или элемент массива должны располагаться слева от знака равенства, а задаваемое значение ѕ справа.

Даты можно записывать в переменные памяти, массивы или элементы массива непосредственно, используя скобки:

  CopyCode imageCopy Code
STORE {^1998-12-25} TO gdXMas

Максимальное число переменных памяти или массивов, которые вы можете создать, приведено в Системные Возможности Visual FoxPro. Этот предел можно увеличить или уменьшить с помощью файла конфигурации Visual FoxPro. Подробнее о настройке конфигурации Visual FoxPro, смотрите Адаптация среды Visual FoxPro.

Expand imageПример

  CopyCode imageCopy Code
STORE DATE( ) TO gdDate
STORE 50 TO gnNumeric
STORE 'Hello' TO gcCharacter
STORE .T. TO glLogical
STORE $19.99 TO gyCurrency

DIMENSION gaMyArray(2,2)
SET COMPATIBLE OFF
STORE 2 TO gaMyArray

CLEAR
DISPLAY MEMORY LIKE g*

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