- •Содержание
- •Лабораторная работа №13 Изучение среды разработчика
- •Лабораторная работа № 14 События в Delphi
- •Лабораторная работа №15 Примеры создания модулей
- •Лабораторная работа №16 Примеры использования компонентов Label, Edit, Memo
- •Лабораторная работа №17 Примеры использования командных кнопок
- •Лабораторная работа№18 Изучение методов и свойств
- •Лабораторная работа№19 Пример использования компонентов RadioGroup и CheckListBox, Radiobutton, CheckBox.
- •Лабораторная работа№20 Примеры использования компонентов ListBox и ComboBox.
- •Лабораторная работа№21 Примеры использования компонента StringGrid.
- •Лабораторная работа №22 Отладка программ
- •Лабораторная работа№23 Примеры использования компонентов Image, Shape, Timer.
- •Лабораторная работа №24 Работа с формами
- •Лабораторная работа№25 Примеры использования компонента MainMenu и PopupMenu.
- •Лабораторная работа№26 Примеры использования компонентов OpenDialog, SaveDialog и FontDialog.
- •Лабораторная работа№27 Создание мультимедийных приложений.
- •Лабораторная работа№28 Печать текстовая и графическая.
- •Лабораторная работа№29 Работа с базами данных
- •Регистрация базы данных – создание псевдонима
- •Создание программы в Delphi
- •Лабораторная работа№30 Сортировка и фильтрация данных
- •Лабораторная работа№31 Вычисляемые поля. Перенос полей на форму
Лабораторная работа№30 Сортировка и фильтрация данных
Цель работы: научиться выполнять в приложения, работающих с базами данных, сортировку и фильтрацию данных
Студент должен
знать:
компоненты для доступа к источникам данных
компоненты управления данными
события, инициируемые при работе с базами данных
свойства, определяющие фильтрацию (определение свойств на этапе проектирования и программно, во время выполнения)
уметь:
создавать вторичные индексы
выполнять сортировку и фильтрацию данных при работе с базой данных.
Примеры и задания.
Рассмотрите приведенный ниже пример, письменно поясните процедуры, расставьте комментарии к командам
// фильтрация
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
case RadioGroup1.ItemIndex of
0: begin Table1.Filter:= 'Zarplata=' + Edit1.Text; Table1.Filtered:=true; end;
1: begin Table1.Filter:= 'Obraz='''+ComboBox1.Text+''''; Table1.Filtered:=true; end;
2: Table1.Filtered:=False;
end;
end;
// сортировка
procedure TForm1.BitBtn2Click(Sender: TObject);
begin
case RadioGroup2.ItemIndex of
0:table1.indexname:='Zarplat';
1:table1.indexname:='Pro';
2:begin table1.indexname:='Nalo'; end;
3:table1.indexname:='';
end;
end;
Варианты заданий
Создать приложение для заполнения таблицы базы данных ИС и ввести в таблицу не менее 7 записей. Осуществить сортировку и фильтрацию данных, согласно критериям, выбранным пользователем
Задание №1.
Разработать информационную систему (ИС)
"Учет товаров на складе торговли".
ИС должна содержать следующую информацию:
-дата прихода товара;
-номер приходной накладной;
-название поставщика;
-страна изготовитель;
-цена товара по приходу;
-количество поступившего товара;
-единица измерения.
-цена продажи товара;
-наименование товара.
Задание №2.
Разработать информационную систему (ИС)
"Оформление платежного поручения".
ИС должна содержать следующую информацию:
-наименование плательщика;
-код плательщика;
-банк плательщика;
-счет плательщика.
-наименование получателя;
-код получателя;
-банк получателя;
-счет получателя.
-сумма платежа;
Задание №3.
Разработать информационно-поисковую систему (ИПС)
"Электронный каталог экономической литературы".
ИПС должна содержать следующую информацию:
-название раздела;
-код раздела;
-название публикации;
-автор публикации;
-издательство;
-год издания;
- объем издания.
Задание №4.
Разработать информационную систему (ИС)
"Бюджет организации".
ИС должна содержать следующую информацию:
-клиент;
-сумма поступления;
-наименование товара или услуг;
-стоимость товара или услуг;
-сумма платежа.
-вид сбережения;
-сумма вклада.
Задание №5.
Разработать информационную систему (ИС)
"Регистрационный отдел гостиницы".
ИС должна содержать следующую информацию:
- номер комнаты;
- дата начала проживания;
- дата окончания проживания;
- Ф.И.О. клиента;
- количество мест;
- стоимость проживания за сутки;
- характеристика комнаты (например, - суперлюкс, - 3-х местный).
Задание №6.
Разработать информационно-справочную систему (ИСС)
"Отдел кадров".
ИСС должна содержать следующую информацию:
-профессия;
-образование;
-стаж работы;
-пол;
-возраст;
-зарплата в месяц;
-Фамилия, Имя, Отчество;
-домашний адрес.
Задание №7.
Разработать информационно-справочную систему (ИСС)
"Медтехника"
Справочная система "Медтехника" содержит сведения о лечебных заведениях и медицинском оборудовании, обслуживаемом фирмой "Медтехника" в этих лечебных заведениях.
ИС должна содержать следующую информацию:
-название населенного пункта
-название лечебного учреждения
- адрес
-вид медицинского оборудования,
-цена,
-заводской номер,
-дата выпуска,
-характер неисправности.
Задание №8.
Разработать информационную систему (ИС)
“Учета материальных ценностей в организации”
Информационная система содержит следующую информацию:
-Фамилию и инициалы сотрудника.
-Название отдела закрепленного за сотрудником.
-Название оборудования, закрепленного за сотрудником.
-Инвентарный номер.
-Дата выпуска.
-Дата последней инвентаризации.
Задание №9.
Разработать информационную систему (ИС)
“Деканат”
Информационная система содержит следующую информацию:
-Фамилия, имя, отчество студента;
-учебная группа;
-номер зачетной книжки;
-дата рождения;
-адрес;
-оценки
-название дисциплины;
Задание №10.
Разработать информационную систему (ИС)
“Организация дипломного проектирования студентов”
Информационная система содержит следующую информацию:
-Фамилию и инициалы дипломника;
-Название дипломного проекта;
- Фамилию руководителя;
-Фамилию рецензента;
-Дату защиты проекта.
-Оценку, полученную на защите.
Контрольные вопросы:
1.Назовите свойства, определяющие фильтрацию
2.Как задать свойства, определяющие фильтрацию на этапе проектирования ?
3.Как задать свойства, определяющие фильтрацию программно, во время выполнения?
4.Как создавать вторичные индексы?
5. Как выполнять сортировку данных при работе с базой данных.?