На форме просмотра зарегистрированных после ее открытия отображаются параметры информации о возможных абитуриентах, а сами абитуриенты представлены в группах. Используется следующая иерархия групп: по факультетам, по специальностям, по форме оплаты. Справа на панели управления расположены две кнопки для быстрой группировки. На рисунке 14 показана кнопка Сгруппировать и сгруппированные данные после нажатия на эту кнопку. Причем после группировки остается выделенным абитуриент, который был выбран при разгруппированном отображении. Это можно проследить если сравнить формы на рисунках 14 и 15.
Рис.14 Форма просмотра зарегистрированных возможных абитуриентов. Сгруппированные данные
Рис.15 Форма просмотра зарегистрированных возможных абитуриентов. Разгруппированные данные
На рисунке 15 показано как действует кнопка Разгруппировать и выделен возможный абитуриент. Также как и в случае с кнопкой Сгруппировать, если в режиме сгруппированного отображения данных был выделен возможный абитуриент, то после разгруппировки выделение не снимается. За функционал группировки отвечает следующий программный код:
{Обрабатываем нажатие кнопки разгруппировать}
procedure TFView.AagroupExecute(Sender: TObject);
begin
sDBTableView1PAY_FORM_ID.GroupIndex:= -1;
sDBTableView1PAY_FORM_ID.Caption:= 'Форма оплаты';
sDBTableView1PAY_FORM_ID.Visible:= true;
sDBTableView1NAME1.GroupIndex:= -1;
sDBTableView1NAME1.Caption:= 'Специальность';
sDBTableView1NAME1.Visible:= true;
sDBTableView1NAME2.GroupIndex:= -1;
sDBTableView1NAME2.Caption:= 'Факультет';
sDBTableView1NAME2.Visible:= true;
end;
{Обрабатываем нажатие кнопки сгруппировать}
procedure TFView.AGroupExecute(Sender: TObject);
begin
sDBTableView1NAME2.GroupIndex:= 0;
sDBTableView1NAME2.Caption:= '';
sDBTableView1NAME2.Visible:= false;
sDBTableView1NAME1.GroupIndex:= 1;
sDBTableView1NAME1.Caption:= '';
sDBTableView1NAME1.Visible:= false;
sDBTableView1PAY_FORM_ID.GroupIndex:= 2;
sDBTableView1PAY_FORM_ID.Caption:= '';
sDBTableView1PAY_FORM_ID.Visible:= false;
end;
При выборе абитуриента и нажатии на кнопку Редактирование или при двойном щелчке мыши по выбранному абитуриенту открывается форма редактирования возможного абитуриента. Она показана на рисунке 16.
При выборе абитуриента и нажатии на кнопку Создать сообщение открывается форма Сообщение, показанная на рисунке 17.
Кнопка Печать предназначена для предварительного просмотра созданных отчетов таких как: общий отчет, «ваш» отчет, диаграммы. Нажатие на кнопку Печать и открытие предварительного просмотра отчетов обрабатывает следующий программный код:
{Обрабатываем нажатие кнопки Печать -> Название отчета}
procedure TFView.APrintExecute(Sender: TObject);
begin
frxReport_View.Clear;
try
if not frxReport_View.LoadFromFile
(ExtractFilePath(Application.ExeName)+'Название
отчета.fr3') then
MessageBox(0, PansiChar('Не удалось загрузить файл
отчета!'+ #13 + #10 + 'Проверьте наличие файла'),
'Внимание!', MB_ICONSTOP or MB_OK or
MB_TASKMODAL);
finally
frxReport_View.ShowReport(true);
end;
end;
Рис.16 Форма редактирования возможного абитуриента
Рис.17 Форма создания сообщения
Форма редактирования
Форма редактирования (рисунок 16) предназначена для редактирования ранее введенной информации по будущему абитуриенту. Она представляет собой форму регистрации с ограниченным функционалом. На форме не отображается уникальный идентификатор абитуриента, так как его нельзя редактировать. Также нет кнопки Регистрация, так как происходит процесс редактирования, а не регистрации. Кнопка Печать ID не нужна потому, что не для кого печатать Карточку абитуриента.
