If OpenDialog1.Execute then begin

Try

Begin

Var

Begin

Var

Cat: OLEVariant;

Cat:= CreateOLEObject('ADOX.Catalog');

Cat.Create('Provider=Microsoft.Jet.OLEDB.4.0.;’ +

‘Data Source= t:\Иванов\Лр1\TCE_111.mdb');

end;

Листинг1. Пример создания базы данных «TCE_111.mdb» при помощи OLEDB –провайдера.

5) Cоздать структуру реляционной таблицы, содержащей информацию о силовом оборудовании тяговой подстанции по заданному варианту, при помощи подпрограммы – обработчика события нажатия на соответствующий элемент меню.

procedure TForm2.N2Click(Sender: TObject);

begin

ADOConnection1.Execute('Create Table Трансформаторы( ' +

'Тип_трансформатора Char(25),' +

'Sном Float,' +

'uk Float,' +

'Pкз Float,' +

'Pхх Float,' +

'Иллюстрация Image,' +

'Описание Text)');

end;

Листинг2. Пример создания структуры таблицы базы данных «Трансформаторы» с использованием компонента TADOConnection.

Примечание. Два последних поля добавляются обязательно для всех вариантов заданий.

6) Включить в приложение компоненты, необходимые для организации доступа к таблице локальной базы данных MS Access и её визуализации в виде сетки.

7) Создать связь приложения с сервером баз данных (MS Access) и настроить свойства объектов в инспекторе объектов, необходимые для отображения набора данных, навигации по таблице и её модификации.

8) Запустить приложение и заполнить реляционную таблицу в соответствии с заданным вариантом.

Содержание отчёта.

1) Номер, название, цель и задача лабораторной работы.

2) Исходная таблица из справочника по заданному варианту.

3) Структура реляционной таблицы с подробным описанием полей, типов и размеров.

4) Реляционная таблица, полученная преобразованием исходной таблицы из справочника.

5) Снимок экрана (скриншот) интегрированной среды разработчика с активированной реляционной таблицей.

6) Скриншот приложения в режиме выполнения.

7) Распечатка подпрограммы – запроса на создание таблицы.

8) Выводы по работе и проблемы, возникшие при выполнении лабораторной работы.

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

Варианты заданий.

№№	Название таблицы в справочнике по электроснабжению железных дорог.	№ Талицы
1.	Электрические характеристики и установочные данные масляных выключателей для напряжений 110 и 220 кВ	19.1
2.	Установочные данные масляных выключателей для напряжений 110 и 220 кВ	19.2
3.	Электрические характеристики и установочные данные выключателей для напряжения 27,5 и 35 кВ	19.3
4.	Установочные данные выключателей для напряжения 27,5 и 35 кВ	19.4
5.	Электрические характеристики и установочные данные выключателей для напряжения 10 кВ	19.5
6.	Установочные данные выключателей для напряжения 10 кВ	19.6
7.	Электрические характеристики и установочные данные электромагнитных приводов	19.7
8.	Установочные данные электромагнитных приводов	19.8
9.	Установочные данные силовых трансформаторов классов напряжения 150 и 220 кВ	19.11
10.	Электрические характеристики, габарит и масса однофазных трансформаторов и автотрансформаторов для системы тяги 2Х25 кВ	19.14
11.	Габарит и масса однофазных трансформаторов и автотрансформаторов для системы тяги 2Х25 кВ	19.15
12.	Электрические характеристики и установочные данные трёхфазных трёхобмоточных трансформаторов класса напряжения 110 кВ	19.16
13.	Установочные данные трёхфазных трёхобмоточных трансформаторов класса напряжения 110 кВ	19.17
14.	Электрические характеристики трёхфазных двухобмоточных трансформаторов класса напряжения 110 кВ мощностью 6300 кВА и выше	19.18
15.	Установочные данные трёхфазных двухобмоточных трансформаторов класса напряжения 110 кВ мощностью 6300 кВА и выше	19.19
16.	Электрические характеристики силовых трансформаторов классов напряжения 10 и 35 кВ мощностью 1000 кВА и выше	19.20
17.	Установочные данные силовых трансформаторов классов напряжения 10 и 35 кВ мощностью 1000 кВА и выше	19.21
18.	Электрические характеристики силовых трансформаторов классов напряжения 10 и 35 кВ мощностью до 630 кВА включительно	19.22
19.	Установочные данные силовых трансформаторов классов напряжения 10 и 35 кВ мощностью до 630 кВА включительно	19.23
20.	Электрические характеристики однофазных и трёхфазных двухобмоточных трансформаторов на напряжение 6; 10 и 27,5 кВ	19.24
21.	Установочные данные однофазных и трёхфазных двухобмоточных трансформаторов на напряжение 6; 10 и 27,5 кВ	19.25
22.	Электрические характеристики выпрямительных преобразователей	19.28
23.	Установочные данные выпрямительных преобразователей	19.29
24.	Электрические характеристики выпрямительно-инверторных преобразователей	19.30
25.	Установочные данные выпрямительно-инверторных преобразователей	19.31
26.	Электрические характеристики преобразовательных трансформаторов	19.34
27.	Габариты преобразовательных трансформаторов	19.35
28.	Масса преобразовательных трансформаторов	19.36
29.	Электрические характеристики быстродействующих выключателей постоянного тока	19.39
30.	Установочные данные выключателей постоянного тока	19.40
31.	Электрические характеристики разъединителей наружной установки классов напряжения 35, 110, 150, 220 кВ	19,42
32.	Установочные данные разъединителей наружной установки классов напряжения 35, 110, 150, 220 кВ	19,43
33.	Основные технические данные разъединителей внутренней установки класса напряжения 10 кВ. Представить в виде 2-х таблиц.	19.45
34.	Основные технические данные отделителей классов напряжений 35, 110, 150 и 220 кВ. Представить в виде 2-х таблиц.	19.49
35.	Основные технические данные короткозамыкателей классов напряжений 35, 110, 150 и 220 кВ. Представить в виде 2-х таблиц.	19.50
36.	Основные технические данные реакторов РБА и РБАМ на напряжение 10 кВ. Представить в виде 2-х таблиц.	19.52
37.	Результирующее реактивное сопротивление 1км тяговой сети однопутного участка	2.6
38.	Результирующее активное сопротивление 1км тяговой сети однопутного участка	2.8
39.	Результирующее активное сопротивление 1км тяговой сети одного пути двухпутного участка	2.9
40.	Результирующее реактивное сопротивление 1км тяговой сети одного пути двухпутного участка	2.10
41.	Результирующее активное сопротивление 1км тяговой сети двухпутного участка при параллельном соединении контактных подвесок	2.12
42.	Результирующее реактивное сопротивление 1км тяговой сети двухпутного участка при параллельном соединении контактных подвесок	2.13
43.	Основные технические данные установок поперечной компенсации КУ. Основные технические данные конденсаторов	10.1, 10.2
44.	Основные технические данные установок продольной компенсации КУ УПК. Основные технические данные конденсаторов	10.2, 10.3
45.	Трубчатые разрядники	11.7
	Характеристики вентильных разрядников переменного тока	11.8

Теоретические сведения к работе.

Компанией Microsoft был предложен механизм доступа к данным ActiveX Data Objects (ADO).

ADO – это набор библиотек, содержащих СОМ-объекты, реализующие прикладной программный интерфейс для доступа к данным и используемые в клиентских приложениях.

ADO становится всё более популярным способом доступа к данным, так как включён в ядро операционных систем семейства Windows, и входит в состав таких популярных продуктов, как MS Office и MS Internet Explorer.

Все таблицы базы данных хранятся в одном файле (в отличие от Paradox и Dbase) и не требует при этом запущенного сервера баз данных.

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

Очень важную роль играют провайдеры ADO, координирующие работу приложений с хранилищами данных различных типов.

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

При установке соединения через соответствующие компоненты становится доступен список установленных в операционной системе провайдеров.

В модуль данных (или в форму) добавляется компонент источника данных (TDataSource), являющийся связующим звеном между набором данных и элементами управления, отображающими данные. Свойство DataSet компонента типа TDataSource указывает набор данных, формируемый компонентами таких классов, как TADOTable или TADOQuery.

В форму добавляются элементы управления для работы с данными, такие как TDBGrid, TDBEdit, TDBCheckbox и т.п. Они связываются с источником данных через свойство DataSource или DataSource и DataField.

Назначение компонентов страницы ADO (dbGo).

Название	Описание
ADOConnection	Позволяет указывать местоположение базы данных.
ADOCommand	Предназначен для выполнения SQL–команды без возврата результирующего набора данных.
ADODataSet	Предназначен для получения набора данных из одной или нескольких таблиц БД. Позволяет работать с возвращённым набором данных визуальным компонентам.
ADOTable	Используется для доступа к таблице с помощью механизма ADO.
ADOQuery	Позволяет формировать запросы к БД, которые возвращают данные из базы (например, командой SELECT) или не формируют результирующего набораданных (например, INSERT).

Компоненты ADOCommand и ADODataSet связываются с источником данных посредством объекта ADOConnection, указывая ссылку на него как значение свойства Connection.

Для идентификации соединения необходимо определить значение свойства ConnectionString (строка соединения) компонента ADOConnection.

Реализацию доступа к данным через ADO проще всего рассмотреть на примерах.

Откроем обычный проект Delphi и сохраним его в личном каталоге. Перенесём на него компоненты, необходимые для доступа к таблице базы данных и отображения информации (рисунок 2). Страницы палитры компонентов, на которых располагаются компоненты, показаны на рисунках 3,4 и 5.

Рисунок 2. Создание приложения баз данных. Компоненты, необходимые для доступа к таблицам базы данных, визуализации, навигации и модификации информации.

Рисунок 3. Страница dbGo палитры компонентов, содержащая компоненты, реализующие технологию ADO.

Рисунок 4. Страница Data Access палитры компонентов, содержащая компоненты-провайдеры, обеспечивающие связь источников данных с компонентами отображения и модификации информации.

Рисунок 5. Страница Data Controls палитры компонентов, содержащая компоненты отображения и модификации источника данных.

Установим связь приложения с сервером баз данных при помощи мастера соединений. Последовательность действий поясняется на рисунках 6, 7 и 8.

Далее следует задать значения свойствам компонента ADOTable1 для обеспечения доступа к набору данных таблицы:

Connection -> ADOConnection1;

TableName -> имя таблицы (выбирается из списка);

Active -> true.

С этого момента можно приступить к настройке свойств компонентов визуалазации, навигации и модификации информации реляционной таблицы:

DataSource1:

DataSet -> ADOTable1.

DBGrid1:

DataSource -> DataSource1.

DBNavigator1:

DataSource -> DataSource1.

После выполнения указанных операций следует откомпилировать и запустить приложение. Ввести данные в таблицу с клавиатуры компьютера. Завершить приложение. Вид интегрированной среды разработчика после завершения работы приложения приведен на рисунке 9.

Рисунок 6. Первый шаг создания соединения приложения с базой данных. Диалоговое окно вызывается двойным щелчком мышки по компоненту TADOConnection. Далее следует нажать кнопку Build.

Рисунок 7. Второй шаг создания соединения приложения с базой данных. Выбирается провайдер Microsoft Jet для связи с MS Access. Нажатие на кнопку «Далее>>» обеспечивает переход к следующему окну.

Рисунок 8. Третий шаг создания соединения приложения с базой данных. Выбирается имя базы MS Access из личного каталога. Проверяется корректность соединения нажатием кнопки «Проверить соединение». В случае успеха следует нажать на всех открытых окнах кнопку «Ok» (3 раза).

Рисунок 9.Интегрированная среда разработчика. По технологии ADO получен доступ к реляционной таблице базы данных, содержащей параметры понижающих трансформаторов тяговых подстанций.

Контрольные вопромы и задачи.

1. Можно ли установить соединение с базой данных по технологии ADO, не используя компонент TADOConnection.

2. В чём основное отличие компонента TADOTable от TADOQuery.

3. В чём различие компонентов TADOQuery и TADOCommand.

4. Сопоставьте стандартные типы данных Delphi и SQL.

5. Чем таблица из справочника отличается от реляционной таблицы базы данных.

6. В чём главные преимущества доступа к базам данных по технологии ADO.

7. Какую роль в приложении баз данных играет компонент TDataSource.

8. Какие компоненты приложения баз данных предназначены для отображения информации и управления данными.

Лабораторная работа №2 (№9).

Формирование запросов к локальным базам данных на языке SQL. Отображение графических и объёмных текстовых данных в режиме формы.

Цель работы.

Освоение основ языка формирования запросов – SQL и операций реляционной алгебры.

Постановка задачи.

Сформировать и выполнить статичексие и динамические запросы к реляционным таблицам базы данных на SQL.

Порядок выполнения работы.

1) Произвести поиск графических изображений и описаний оборудования системы тягового электроснабжения (СТЭ) в справочниках и интернете, в соответствии с заданным вариантом, для каждой строчки таблицы.

2) Добавить на форму приложения (л.р. №8) два визуальных компонента (TDBImage и TDBMemo), предназначенных для отображения графических изображений оборудования СТЭ и описательной текстовой информации большого объёма, хранящейся в базе данных.

3) Добавить подпрограмму-обработчик события для занесения графических изображений в поле Drawing (иллюстрации) таблицы базы данных (Листинг 1).

4) Занести графическую и текстовую информацию в базу данных.

5) Добавить в приложение визуальный построитель запросов на основе компонентов TMemo и TADOQuery.

6) Сформировать статический и динамический запрос к базе данных.

7) Cоздать тест и произвести отладку приложения.

8) Запустить приложение и выполнить запросы к базе данных.

procedure TForm2.Button1Click(Sender: TObject);

bmp: TBitMap;

jpg: TJpegImage;

s: String;

bmp:= TBitMap.Create;

jpg:= TJpegImage.Create;

s:= UpperCase(ExtractFileExt(OpenDialog1.FileName));

if s = '.BMP' then begin

bmp.LoadFromFile(OpenDialog1.FileName);

DBImage1.Picture.Bitmap.Assign(bmp);

end;

if (s = '.JPG') or (s = '.JPEG') then begin

jpg.LoadFromFile(OpenDialog1.FileName);

bmp.Assign(jpg);

DBImage1.Picture.Bitmap.Assign(bmp);

end;

end;

Дата добавления: 2014-12-25