Реферат: Учет общественной активности студентов академической группы
6. Ведомость;
7. О программе.
Рассмотрим работу некоторых из них.
Добавление, редактирование и удаление данных
В пункте Редактирование создаем три подпункта: Добавить запись, Редактировать запись, Удалить запись. Для этого создадим новую форму, которую подключим к модулю DataModule2.
Напротив надписей (Label) создадим компоненты DBEdit с вкладки DataControls. Эти компоненты представляют собой простые строки ввода для поля в базе данных. Чтобы компонент видел данные из нужного поля, следует указать для него в свойстве DataSource необходимую таблицу, а в свойстве DataField указать поле, которое надо редактировать.
Для обработчика кнопки «Сохранить» код следующий:
ifDataModule2.ADOTablel.ModifiedthenDataModule2.ADOTablel.Post; Для кнопки «Отмена» нужно использовать метод Cancel, отменяющий изменения текущей строки, если они не были сохранены еще с помощью метода Post, т.е. написать следующий код:
DataModule1.ADOTable1.Cancel.
После разработки формы редактирования, ее можно использовать в обработчике пункта меню Добавить запись, написав код:
DataModule2.ADOTable1.Insert; // вставка строки в таблицу EditForm.ShowModal; // вызов формы редактирования
Обработчик меню Удалить запись может реализовать следующий код: ifApplication.MessageBox (РСhаr('Вы действительно хотите удалить запись?' +DataModule2.ADOTablei1.DesignerData), 'Внимание!!!', MB OKCANCEL)=id_ OK
then DataModule2.ADOTablel .Delete;
Сортировка данных В любой базе данных существует понятие индексного поля. Индексы увеличивают скорость поиска данных и позволяют сортировать все записи. Обязательным является только главный индекс (ключевое поле) и существует всегда. Можно создавать любое количество дополнительных индексированных полей, однако индексирование отнимает дополнительное место на диске, и если таких полей будет много, то можно снизить быстродействие программы.
Для обеспечения сортировки данных по каждому полю достаточно написать обработчики событий. В своем приложении сортировка
производится по полям: «По фамилии», «По группе».
Далее приведен пример кода для выполнения сортировки по фамилии:
procedure TForml.N9Click(Sender: TObject);
begin
DataModule2.ADOTable1.IndexFieldNames:='Фамилия'; DataModule2.ADOTable2.IndexFieldNames:='Фамилия';
end;
В данном случае сортировка будет производиться по возрастанию. Для отмены сортировки необходимо указать пустую строку.
Следует помнить о том, что, если вы хотите делать сортировку по какому-либо полю, то при объявлении названия поля в MSAccess оно должно состоять из одного слова.
Фильтрация данных
Одним из эффективных и востребованных инструментов обработки данных является организация их фильтрации. Для организации фильтрации в компоненте TADOTable есть свойства Filter и Filtered. Свойство Filtered определяет является ли таблица фильтруемой и только если оно имеет значение true, то воспринимается свойство Filter как строка содержащая текст условия определяемого в виде:
Поле [Оператор сравнения] 'Значение'.
В приложении «Учет общественной активности студентов академической группы» реализована функция фильтрации данных для пункта главного меню Активность студентов.
Данный пункт содержит следующие подпункты :
1. По видам деятельности:
1.1. Спортсмены;