5.2. Основная программа

Запишем в окне VFP, открываемом, например, при выполнении File – New – Program – New file, следующую программу:

clear

&& Определяем значение переменной x

store 25 to x

y = Sqrt(x)

&& Выводим данные в окно VFP

? "Сообщения простой программы:" Font "Arial" Style "I"

? "x = ", x picture "99"

? "Квадратный корень из x равен ", y picture "9.9"

В этой программе используются команды ?, &&, CLEAR и STORE и создаются 2 переменные – x и y, для определения значения последней употребляются оператор присваивания (=) и встроенная функция SQRT( ).

Команды программы имеют следующее назначение:

• ? – обеспечивает вывод данных в окно VFP;

• && – начинает строку комментария;

• CLEAR – очищает текущее окно VFP;

• STORE – присваивает переменной x значение равное 25.

Сохраним программу в текстовом файле d:\Prog1.prg (файлам с исходными текстами программ VFP задается, как правило, расширение PRG).

Для ее запуска достаточно в командном окне набрать

do d:\Prog1.prg

и нажать затем на Enter.

Если окно с текстом программы открыто и активно, то для запуска программы можно употребить Ctrl+E. Перед исполнением программа, если в нее внесены изменения, компилируется.

В результате исполнения программы в главном окне VFP появятся 3 следующие строчки:

Сообщения простой программы:

x = 25

Квадратный корень из x равен 5.0

Файл с программой можно открыть в VFP либо посредством File – Open, либо набрав в командном окне

modify command d:\Prog1.prg

Программу, не предваряемую командой PROCEDURE или FUNCTION, будем называть основной.

Замечания:

1. VFP позволяет при наборе команды употреблять 4 первые буквы каждой составляющей части команды. Так, только что приведенную выше команду можно, в принципе, записать следующим образом:

modi comm d:\Prog1.prg

Сокращать имена некоторых команд нельзя. Так, нельзя сокращать имя команд LOCAL и LOCATE до 4-х букв, поскольку после этого команды становятся неразличимыми.

2. При работе с текстом программы полезным инструментом является меню Format, позволяющее в частности управлять отступами, комментарием и регистром кода (рис. 5.1)

Рис. 5.1. Фрагмент меню Format

3. Регистр при записи команд, имен процедур, функций, переменных и констант не имеет значения.

4. Расширение PRG в имени файла в командах DO (при запуске программы) и MODIFY COMMAND может быть опущено, например:

modify command d:\Prog1

5.3. Структура программы

Имеет следующий вид:

<Команда, задающая параметры>

<Исполняемые операторы>

<Коды процедур и функций>

<Определения классов>

Исполняемые операторы – это команды и конструкции VFP, оператор присваивания, вызовы процедур и функций.

Части оператора, если их нужно записать на нескольких строчках, разделяются точкой с запятой, например:

replace AuthorId with 10 ; Author with "Новый автор" ; InputDate with Date( )

В одной строке может присутствовать только один оператор или его часть.

Пример. Код приводимой в примере программы сохраним в файле d:\ExProg.prg.

parameters p1, p2, p3 && Параметры программы

numberOfPassedParameters = Pcount( )

if numberOfPassedParameters = 3 then && Исполняемые операторы

ShowPassedParameters(p1, p2, p3)

else

MessageBox("Передано параметров: " + Transform(numberOfPassedParameters))

endif

procedure ShowPassedParameters && Процедура ShowPassedParameters( )

lparameters p1, p2, p3

? p1, p2, p3

endProc

После выполнения, например, в командном окне операторов

p1 = "Первый, "

p2 = "второй "

do d:\ExProg.prg with p1, p2, "и третий параметры."

в окно VFP будет выведено сообщение

Первый, второй и третий параметры.

Замечание. Для выполнения в командном окне нескольких операторов следует первоначально их выделить, а затем либо нажать на Enter, либо в контекстном окне, появляющемся при нажатии на правую кнопку мыши, выбрать Execute selection.

Если же файл d:\ExProg.prg открыть и запустить на исполнение, нажав Ctrl+E, то число переданных параметров будет равно нулю, что приведет к вызову функции MessageBox( ) и появлению приведенного на рис. 5.2 сообщения.

Рис. 5.2. Файл d:\ExProg.prg открыт; нажата комбинация клавиш Ctrl+E

Программа может включать комментарий, оформляемый командами &&, * или NOTE.

В отличие от команд * и NOTE, команда && может присутствовать и в строке с оператором, располагаясь после него.

Если комментарий нужно продолжить на другой строке, то в конце текущей строки комментария проставляется точка с запятой.

Примеры:

&& Это комментарий ;

и его продолжение

* Это также комментарий

note Комментарий с продолжением на другой строке, задаваемый ;

командой NOTE

x = 2 && Комментарий в строке с оператором