.
Delphi. Урок 8.2. Программирование баз данных в Delphi 7 (TTable, TDataSource, TDBGrid)
Автор megabax   
14.07.2009 г.
New Page 1

Программирование баз данных в Delphi 7 (TTable, TDataSource, TDBGrid)

Продолжим создавать программу складского учета. Прежде чем начать программировать, создадим для нашей базы данных Alias. Для это входим в уже известный Вам по прошлому уроку Database desktop. Выбираем пункт меню «Tools» à «Alias Manager»*

 

Программирование баз данных в Delphi 7 (TTable, TDataSource, TDBGrid)

 

У нас открылось окно «Alias Manager». Нажмем на кнопку «New». В поле Database Alias введем название нашей базы данных, ну, например, StorePrj. В поле Path введем путь к каталогу, в котором на прошлом уроке вы сохранили созданную таблицу товаров. Для быстрого выбора пути можно воспользоваться кнопкой Browse. Driver type оставим Standart*.

 

Delphi 7 (TTable, TDataSource, TDBGrid)

 

Теперь я расскажу о том, для чего нам нужно создавать Alias. Дело в том, что в будущем мы можем захотеть переместить наши таблицы баз данных в другой каталог, или вообще на другой компьютер, где, возможно, придется расположить на другом диске. А представьте себе, что все пути к таблицам в программе жестко заданы? Это придется переписывать всею программу! Ужас! А тут мы взяли да и изменили путь в настройках Alias-а.

А вот теперь будем программировать. Создаем новый проект, присваиваем форме имя frmWares.

 

Положим на форму TTable*

 

Программирование баз данных в Delphi 7

 

Назовем его tbWares. Свойство DatabaseName установим в StorePrj (вот нам и пригодился Alias). После это мы можем установить свойство TableName путем выбора из выпадающего списка. Пока у нас там только одна таблица – созданная нами wares.db. Свойство Active установим в true.

Затем добавим компонент TDataSource*.

 

Базы данных (TTable, TDataSource, TDBGrid)

 

Назовем его dsWares. Свойство DataSet установим в tbWares.

Затем добавим компонент TDBGrid*

 

Программирование баз данных в Delphi 7 (TTable, TDataSource, TDBGrid)

 

Назовем его dbgWares. Свойство DataSource установим в dsWares. Затем добавим TDBNavigator*.

 

 

 Программирование баз данных в Delphi 7 (TTable, TDataSource, TDBGrid)

 

Назовем его dbnWares. Свойство DataSource установим в dsWares. Запускаем программу. Теперь мы можем редактировать таблицу товаров.

 

Программирование в Delphi 7 (TTable, TDataSource, TDBGrid)

 

При помощи компонента TDBNavigator мы можем добавлять запись, удалять, применять изменения, которые внесли непосредственно в таблицу (кнопка Программирование баз данных в Delphi 7 (TTable, TDataSource, TDBGrid)*), перемещаться по базе данных, отменять последние изменения. Если непосредственно в таблице вы отредактируете строчку и перейдете на другую, то изменения автоматически применятся.


Скриншоты, помеченные знаком * , являются цитатами и иллюстрациями   программного продукта "Delphi", авторское право на который принадлежит "Borland Software Corporation".


 

 

 

Последнее обновление ( 06.11.2011 г. )