Подключение Database к БД

Компонент Database

Настройка подключения к БД. Технология ADO

Лекция 14

Select avg(speed) from laptop

Select avg(speed) from pc

Group By maker

Select maker, avg(screen) From Laptop, Product

Select distinct maker From Product, PC

Group by speed

Select speed, avg (price) FROM PC

Select model, speed, hd From PC

Select model, ram, screen from laptop

Select distinct maker from product

Select model, speed, hd from pc

where price < 500

Найдите производителей принтеров. Вывести maker.

where type = 'printer'

Найдите номер модели, объем памяти и размеры экранов портативных компьютеров, цена которых превышает $1000.

where price > 1000

 

Найдите все записи таблицы Printer для цветных принтеров.

Select * from printer

where color = 'y'

Найдите номер модели, скорость и размер жесткого диска ПК, имеющих 12х или 24х CD-приводы стоимостью менее $600.

Where cd in ('12x', '24x') and price < 600

Для каждого значения скорости ПК, превышающего 600 МГц, определите среднюю цену компьютера с такой же скоростью. Вывести: speed, средняя цена.

Where speed >600

Найдите производителей ПК с процессором не менее 450 МГц.

Where Product.model=PC.model and speed>=450

Для каждого производителя найти средний размер экрана выпускаемого портативного компьютера. Вывести maker,средний размер экрана.

Where Product.model=Laptop.model

Найдите среднюю скорость ПК.

Найдите среднюю скорость портативных компьютеров дороже $1000.

where price > 1000

- инкапсулирует подключение к БД и используется для:

• управления подключением к БД,

• управление псевдонимами БД,

• управление транзакциями,

• выполнение SQL–запросов.

- служит промежуточным звеном между компонентами набора данных и механизмом доступа к данным.

 

 

В компоненте предусмотрено:

• идентификация базы данных,

• идентификация подключения.

Удобство: все компоненты (Table, Query) подключаются к Database, а он к псевдониму BDE.

Идентификация базы данных:

1. Компонент Database через свойство

• AliasName подключается к BDE-псевдониму.

• в свойство DatabaseName заносится свой внутренний псевдоним (вручную),

2. Компоненты Table, Query подключаются через свойство DatabaseName к внутреннему псевдониму (а имя таблицы приписывается вручную в TableName).

3. И т.д. идет подключение.

 

Идентификация подключения (псевдоним в BDE не прописан):

Все связи между компонентами должны быть прописаны вручную, а также связь таблиц master-detail.

В Database вручную прописать имя внутреннего псевдонима в свойстве DatabaseName (например, proba)

И написать программный код:

 

procedure TForm1.FormCreate(Sender: TObject);

begin

//До этого все связи должны быть прописаны вручную

//а также связь таблиц master-detail

//В Database вручную прописать имя в Databasename (proba)

Database1.DriverName := 'STANDARD';

Database1.Params.Clear;

Database1.Params.Add('PATH =D:\папка');

Database1.Params.Add('DEFAULT DRIVER=PARADOX');

Database1.Params.Add('ENABLE BCD=FALSE');

Table1.Open;

Table2.Open;