Примечание

Команда commit в приведенном скрипте позволяет завершать транзакцию, которую неявно стартует утилита Interactive SQL.

Контрольные задания

1. SQL-операторы, создающие и определяющие объекты базы данных, называют операторами DDL (Data Definition Language, язык описания данных). Приведите, используя справочную систему InterBase, синтаксис оператора create table.

1. Что означает предложение collate pxw_cyrl?

Лабораторная №5, №6 Клиентская часть: размещение не визуальных компонентов, соединение с бд. Клиентская часть: размещение визуальных компонентов, отображение таблиц.

Цель работы: показать размещение компонент доступа к данным и компоненты отображения данных на листах различных типов приложения; грамотно использовать средства, события и методы компонентов;

• Создание приложения в Delphi с использованием InterBase

Рассмотрим использование компонент для создания простейшего приложения. База Baza.gdb состоит из одной таблицы с полями: Ncar, marka, year, fio.

1. Запустите Delphi, создайте приложение и модуль данных. В модуль данных поместите IBDatabase1, IBTransaction1, IBTable1, DataSource1.

Для удобства работы всем компонентам можно дать соответствующие имена:

IBDatabase1	Dcars,
IBTransaction1	Tcars,
IBTable1	cars,
DataSource	DScars

2. В Инспекторе Объектов следует изменить свойства компонент – Dscars, cars, Tcars:

Компонента	Свойство	Значение
DScars	DataSet	cars
cars	Database	Dcars
	Transaction	Tcars
Tcars	DefaultDatabase	Dcars

3. Двойным щелчком по компоненту Dcars вызываем окно Database Component Editor. Нажимаем кнопку Browse и находим папку, где находится созданная база (baza.gdb), открываем ее. Далее делаем все так, как показано ниже на рисунке и нажимаем ОК.

Клиентская часть: размещение

визуальных компонентов,

отображения таблиц.

4. На форму поместите DBGrid1, DBNavigator1, BitBtn1 и BitBtn2.

DBGrid1 - таблица для отображения данных базы данных,

DBNavigator1 - навигатор для управления курсором,

BitBtn1 - кнопка для активизации таблицы,

BitBtn2 - кнопка для закрытия приложения.

Компонента	Свойство	Значение
DBGrid1	DataSourse	DM.DScars
DBNavigator1
cars	Active	True
DBGrid1	Visible	False
DBNavigator1	Enabled	False

В процедуре BitBtn1.Click (кнопка "показать таблицу") напишите:

DBGrid1.Visible:=True;

DBNavigator1.Enabled:=true;

В процедуре BitBtn2.Click (кнопка "закрыть приложение") напишите:

Form1.Close;

5. С охраните проект на диске С:, в папке IB и запустите проект на выполнение.

6. При правильной работе программы у вас должно получится приложение, рисунок которого показан ниже:

7. П ри нажатии на кнопку "показать таблицу", приложение должно принять вид:

Контрольное задание:

Создать приложение для базы EXMPL.gdb с использованием модуля данных и компонент для отображения и заполнения таблиц базы.