Суббота
16.12.2017
21:41


Форма входа

Приветствую Вас Гость | RSS
Borland Delphi 7
Главная Регистрация Вход
Главная » 2009 » Март » 22 » Cоздание базы данных в delphi без сторонних БД (Часть 1)
Cоздание базы данных в delphi без сторонних БД (Часть 1)
08:07
Здравствуйте Delphi'сты и им сочувствующие. 

В комплекте с Delphi 7 поставляются сразу несколько библиотек для работы с базами данных (ADO, BDE, dbExpress, InterBase и др.). Для того чтобы создать приложение, работающее с локальной базой данных, то вы обычно используете библиотеку BDE. Эта библиотека создана компанией Borland и уже порядком устарела. Но без определённой подготовки операционной системы эти компоненты работать не будут. Есть альтернатива этим компонентам. 

Существует автономный компонент TClientDataSet который использует свой собственный формат данных. 

Итак, переходим к практике. Компонент TClientDataSet использует файлы с расширением *.CDS и *.XML мы будем рассматривать формат CDS, так как XML формат занимает вдвое больше места на диске и такой файл легко можно изменить, открыв его через блокнот. Этот компонент при создании проецирует файл в память и модифицирует только память, а при уничтожении данные записываются в файл целиком. Путь к файлу определяет свойство FileName. Файлы формата CDS можно найти в папке program files\Common Files\Borland Shared\Data. Давайте сначала откроем один из них. Скопируем один из них в папку c:\data . 

Кидаем на форму 4 компонента 
1. TClientDataSet 
2. TDataSource 
3. TDBGrid 
4. TDBNavigator 

В результате : 
1. DataSource1 
2. ClientDataSet1 
3. DBGrid1 
4. DBNavigator1 

Настраиваем их свойства так чтобы получилось примерно так: 
DBNavigator1.DataSource = DataSource1 
DBGrid1.DataSource = DataSource1 
DataSource1.DataSet = ClientDataSet1 
ClientDataSet1.FileName = 'D:\111\www\customer.cds' 
ClientDataSet1.Active = True (самое главное этого не забыть :-)) 

И всё готово. Вы сразу у меня спросите: "А как создать новую таблицу?". 
Всё очень просто даже не нужно НИКАКИХ дополнительных программ, только компонент TClientDataSet и конечно Delphi. 

1. Создаём новый проект (можно даже его не сохранять) и добавляем на форму компонент TClientDataSet. 
2. Сначала определим структуру таблицы. Для этого открываем свойство FieldDefs нашего компонента. Открывается окно "Editing ClientDataSet1.FieldDefs" жмём "добавить новый", и определяем свойства поля (тип, формат, размер и т.д.). 
3. Теперь самое главное. Щёлкаем правой кнопкой мыши на компоненте TClientDataSet и выбираем пункт CreateDataSet. Потом ещё раз открываем контекстное меню и выбираем пункт "Save to binary MyBase file" и сохраняем файл туда, куда нам надо. 

Всё готово теперь у нас есть файл CDS. Можно закрывать данный проект и создавать новый, так как это было показано выше. Изменяете его, как хотите, добавляйте, удаляйте, изменяйте короче как обычно. Как модифицировать файл программно и фильтровать и индексировать записи, я вам расскажу позже.

Обсуждения на форуме.
Категория: Статьи участников клуба | Просмотров: 3432 | Добавил: delphi | Рейтинг: 0.0/0 |
Всего комментариев: 0
Имя *:
Email *:
Код *:
Меню сайта

Разделы новостей
Программные обеспечения [6]
Учебники и справочники Delphi [15]
Лабораторные работы [2]
Статьи участников клуба [36]
Советы и трюки [1]

Календарь новостей
«  Март 2009  »
ПнВтСрЧтПтСбВс
      1
2345678
9101112131415
16171819202122
23242526272829
3031

Поиск

Друзья сайта

Мини-чат

Наш опрос
Какой раздел нужно добавить на сайт и на форум?
Всего ответов: 56

Статистика

Copyright MyCorp © 2017