Форма просмотра зарегистрированных

На форме просмотра зарегистрированных после ее открытия отображаются параметры информации о возможных абитуриентах, а сами абитуриенты представлены в группах. Используется следующая иерархия групп: по факультетам, по специальностям, по форме оплаты. Справа на панели управления расположены две кнопки для быстрой группировки. На рисунке 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 не нужна потому, что не для кого печатать Карточку абитуриента.