Cоздание бази даних в Delphi без сторонніх БД. Частина 1

У комплекті з Delphi7 поставляються відразу кілька бібліотек для роботи з базами даних (ADO, BDE, dbExpress, InterBase та ін.) Для того щоб створити додаток, що працює з локальною базою даних, то ви зазвичай використовуєте бібліотеку BDE. Ця бібліотека створена компанією Borland і вже порядком застаріла. Але без певної підготовки операційної системи ці компоненти не працюватимуть. Є альтернатива цим компонентам.

Існує автономний компонент TClientDataSet, який використовує свій власний формат даних.

Отже, переходимо до практики. Компонент TClientDataSet використовує файли з розширенням *. CDS і *. XML ми будемо розглядати формат CDS, так як XML формат займає вдвічі більше місця на диску і такий файл легко можна змінити, відкривши його через блокнот. Цей компонент при створенні проектує файл в пам’ять і модифікує тільки пам’ять, а при знищенні дані записуються в файл цілком. Шлях до файлу визначає властивість FileName. Файли формату CDS можна знайти в папці program filesCommon FilesBorland SharedData. Давайте спочатку відкриємо один з них. Скопіюємо один з них в папку 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:111wwwcustomer.cds”
ClientDataSet1.Active = True (найголовніше цього не забути :-))

І все готово. Ви відразу у мене запитаєте: “А як створити нову таблицю?”.
Все дуже просто навіть не потрібно ніяких додаткових програм, тільки компонент TClientDataSet і звичайно Delphi .

1. Створюємо новий проект (можна навіть його не зберігати) і додаємо на форму компонент TClientDataSet.
2. Спочатку визначимо структуру таблиці. Для цього відкриваємо властивість FieldDefs нашого компонента. Відкривається вікно “Editing ClientDataSet1.FieldDefs” тиснемо “додати новий”, і визначаємо властивості поля (Тип, формат, розмір і т.д.).
3. Тепер найголовніше. Клацаємо правою кнопкою миші на компоненті TClientDataSet і вибираємо пункт CreateDataSet. Потім ще раз відкриваємо контекстне меню і вибираємо пункт “Save to binary MyBase file” і зберігаємо файл туди, куди нам треба.

Все готово тепер у нас є файл CDS. Можна закривати даний проект і створювати новий, так як це було показано вище. Змінюєте його, як хочете, додавайте, видаляйте, змінюйте коротше як зазвичай.


Читати частина 2

Схожі статті:


Сподобалася стаття? Ви можете залишити відгук або підписатися на RSS , щоб автоматично отримувати інформацію про нові статтях.

Коментарів поки що немає.

Ваш отзыв

Поділ на параграфи відбувається автоматично, адреса електронної пошти ніколи не буде опублікований, допустимий HTML: <a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <s> <strike> <strong>

*

*