Создает и освобождает константы времени компиляции.

Вы можете использовать директивы препроцессора #DEFINE и #UNDEF для создания в программах констант времени компиляции. С помощью констант, созданных директивой #DEFINE и используемых вместо переменных, вы можете сократить потребление памяти, увеличить производительность и упростить программы.

Для создания константы с помощью директивы #DEFINE, укажите имя константы в ConstantName и ее значение в eExpression. При компиляции программы производится замена текста и значение константы заменяет имя константы повсюду, где имя константы появляется в тексте программы. Вы можете остановить замещение констант при помощи директивы #UNDEF.

#DEFINE ConstantName eExpression...
#UNDEF ConstantName

Параметры

ConstantName

Указывает имя константы времени компиляции. Имя константы должно представлять допустимое имя Microsoft Visual FoxPro, которое начинается с буквы или символа подчеркивания и состоит из строки длиной до 254 символов, цифр или подчеркиваний. Для улучшения читаемости программ и упрощения отладки, составляйте имена констант из заглавных букв и используйте для них стандартное соглашение по наименованиям.

Предупреждение
Не используйте для имен констант ключевые слова Visual FoxPro.

Для остановки замещения текста, для константы, созданной с помощью директивы #DEFINE, выдайте в программе директиву #UNDEF ConstantName.

eExpression

Указывает значение константы времени компиляции. eExpression может представлять собой имя или выражение, которое оценивается в символьное значение, численное значение, выражение валюты, значение даты, значение даты-времени или логическое значение .T. или .F. .

Предупреждение
Не используйте в качестве выражения для eExpression системные переменные. Системные переменные не оцениваются во время компиляции, а оцениваются только в run time.

Примечания

Visual FoxPro производит замещение только в программном коде, который следует за директивой #DEFINE, создающей константы и который помещен до директивы #UNDEF для этой константы. Константа доступна только для той программы, в которой она создана.

Если вы поместите директиву #DEFINE внутри процедуры события или метода формы, то константы, определенные с помощью #DEFINE доступны внутри процедуры события или метода. Кроме того, вы можете сделать их доступными для других событий или методов, для которых фрагменты кодов, составляющих процедуры этих событий или методов записаны вместе в одном и том же поле типа Memo внутри формы или файла библиотеки класса. Вы не должны быть зависимы от такого поведения, так как порядок, в котором записываются методы может изменяться при многократном сохранения формы или класса в конструкторах. Для того, чтобы сделать константы, определенные с помощью директивы #DEFINE доступными для всех процедур событий и методов в форме или классе, выберите пункт "Включить файл (Include File)" из меню для "Форма" (Form) (или "Класс" (Class)) и укажите файл заголовков, содержащий константы, определенные с помощью #DEFINE.

Замечание
Константы времени компиляции не распознаются, если их имена заключены в кавычки.

Вы можете переопределить #DEFINE только в том случае, когда не изменяете значения. Если вы измените #DEFINE с другим значением, Visual FoxPro сгенерирует ошибку.

Пример

Приведенный ниже фрагмент программы создает константу с именем MAXITEMS. Эта константа используется в цикле FOR ... NEXT для отображения номеров с 1 до 10.

	Скопировать код
#DEFINE MAXITEMS 10 CLEAR FOR gnCount = 1 TO MAXITEMS ? gnCount NEXT

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