2.5.2. Главный файл проекта

Главный файл имеет имя Start.prg. Он выполняется первым при запуске приложения и содержит следующий код:

public appPath

local fileToDo

appPath = 'd:\HomeLibrary\'

fileToDo = appPath + 'Menu\HomeLibrary.mpr'

do (fileToDo)

read events && Начинаем обработку событий

Главный файл назначается после его выбора на одной из вкладок диспетчера проекта и установки флажка Set Main (рис. 2.15) контекстного меню, появляющегося при нажатии на правую кнопку мыши.

Рис. 2.15. Назначение главного файла

2.5.3. Форма "Авторы"

2.5.3.1. Состав формы

Форма "Авторы" (рис. 2.16), имеющая имя AuForm, управляет таблицей Authors и также используется как форма выбора автора в форме "Книги".

Рис. 2.16. Форма Авторы

В форму входят перечисленные в табл. 2.5 элементы управления.

Таблица 2.5

Элементы управления формы "Авторы"

Элемент	Имя	Заголовок	Описание
Сетка	Grid1	–	Отображает таблицу Authors
Поле ввода	Au	–	Используется для поиска автора
Переключатель	OptionGroup1	–	Имеет две кнопки с заголовками "Автор" и "Код". Изменяет порядок отображения записей таблицы Authors в сетке Grid1
Надпись	Label1	Автор	–
"	Label2	Упорядочить по:	–
Кнопка	Command1	Новый	Открывает форму AuthorEdit для добавления новой записи в таблицу Authors
"	Command2	Изменить	Открывает форму AuthorEdit для редактирования записи таблицы Authors
"	Command3	Удалить | Возвратить	Проставляет или снимает пометку удаления записи таблицы Authors
"	Command4	Найти	Осуществляет поиск автора по заданной подстроке. Подстроку поиска хранит свойство AuToFind формы "Авторы"
"	Command5	Список	Формирует пригодный для печати список авторов
"	Command6	Выход	Закрывает форму
"	Command7	Выбрать	Формирует значение флага выбора автора (.T. или .F.) для формы "Книги"; кнопка видна, только если форма "Авторы" открыта из формы "Книги"

В окружение данных формы добавлена одна таблица Authors с одноименным псевдонимом (команда меню View – Data Environment открывает окружения данных формы, а команда меню Data Environment – Add позволяет добавить в него таблицу).

Эта таблица, если не была открыта ранее, открывается и закрывается вместе с формой. Видимость открытых таблиц в пределах текущей сессии данных глобальная. Доступ к таблице и ее полям осуществляется в приводимых программах посредством ее псевдонима Authors.

2.5.3.2. Добавленные свойства формы

В форму добавлены 2 свойства (команда меню Form – Edit Property/Method):

• AuToFind – хранит последнюю использованную обработчиком события Click кнопки "Найти" подстроку поиск автора;

• AuthorSelected – употребляется в режиме выбора автора при работе с формой "Книги" (выбранный автор передается этой форме). Значение свойства первоначально задается равным .F. обработчиком события Init формы, а затем может быть изменено на .T., обработчиком события Click кнопки "Выбрать".

После создания свойства AuToFind его значение следует установить равным некоторой символьной величине, например пробелу (рис. 2.17).

Рис. 2.17. Добавленные свойства формы "Авторы"