Разработка и эксплуатация АИС: Методическое пособие для выполнения лабораторных работ № 9-15, страница 12

Вариант 3:  редактирование информации об отделах.

Вариант 4:  редактирование информации о книгах и читателях.

Вариант 5:  редактирование информации о товарах (наименование, производитель, характеристика) и складах.

Вариант 6:  редактирование информации о группах и кафедрах.

Вариант 7:  редактирование информации о должностях и надбавках за стаж.

Вариант 8:  редактирование информации об офисах.

Вариант 9:  редактирование информации о категориях товаров и производителях.

Вариант 10:  редактирование информации об уровнях заработной платы и надбавках за стаж.

Вариант 11:  редактирование информации о видах кредитов и клиентах

Вариант 12:  редактирование информации о темах.

3)  Включите в отчет программный код и объявление класса формы, созданные в процессе выполнения лабораторной работы.

Контрольные вопросы к работе:

1)  Приведите словесный алгоритм вставки данных в таблицу БД с помощью совокупности компонентов визуализации атомарных значений и обычных компонентов (например, если нужно вставить не только данные, информационного характера, но и заполнить поле внешнего ключа, предоставив пользователю понятный интерфейс для этого – т.е. выводя строковые данные из другой таблицы притом, что вставить нужно целочисленное значение идентификатора).

2)  Как, по-вашему, устроен компонент TDBNavigator с точки зрения программной реализации? Приведите последовательность действий, необходимых для создания его аналога.

3)  Как по-вашему, по какому принципу устроен кэш изменений набора данных в памяти? Приведите аналогию известной Вам технологии решения этой проблемы.

Лабораторная работа №13.

Тема: 

«Программирование работы с базами данных».

Цель работы:

Научиться программировать приложения работающие с БД. Получить практические навыки реализации алгоритмических задач работы с данными, хранящимися в БД.

Пример выполнения задания и краткие теоретические сведения:

Возможности работы с БД в Delphi не ограничены выборкой и отображением данных из БД, а так же их вставкой, удалением и обновлением. Приложение, использующее БД, может сохранять в ней любые данные и использовать их в последствии как переменные, обрабатываемую информацию, настройки, и т.д.

Например, приложение может сохранять в БД свои параметры при выходе и загружать их при запуске. В этом случае оно будет использовать БД как контейнер для сохранения некоторых своих переменных. Попробуем реализовать эту возможность для нашего приложения.

Разместим на форме дополнительный компонент TQuery (назовем его settings_sql). Подключим обычным образом TQuery к нашей БД, а в ней создадим таблицу “settings” следующего вида:

Имя столбца	Тип данных	Комментарий (назначение)
left	INT	Позиция формы на экране
top	INT
width	INT	Размеры формы
height	INT
font	INT	Используемый шрифт
fsize	INT	Размер шрифта

В свойство SQL компонента TQuery запишем следующий запрос:

SELECT left, top, width, height, font, fsize

FROM settings;

И, наконец, определим обработчик создания формы такого вида:

procedure TForm1.OnCreate(Sender: TObject);

begin

Form1.Left   := settings_sql.FieldByName(‘left’).AsInteger;

Form1.Top    := settings_sql.FieldByName(‘top’).AsInteger;

Form1.Width  := settings_sql.FieldByName(‘width’).AsInteger;

Form1.Height := settings_sql.FieldByName(‘height’).AsInteger;

Form1.Font.Name := settings_sql.FieldByName(‘font’).AsString;

Form1.Font.Size := settings_sql.FieldByName(‘fsize’).AsInteger;

end;

В обработчике запроса на закрытие формы нужно прописать операторы сохранения параметров:

procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);

begin

settings_sql.Close;

settings_sql.SQL.Text := ‘UPDATE settings

SET left = ’ + Form1.Left +