New Page 1
Программирование баз данных в Delphi
7 (TTable,
TDataSource, TDBGrid)
Продолжим
создавать программу складского учета. Прежде чем начать программировать,
создадим для нашей базы данных Alias. Для это входим в уже известный Вам по
прошлому уроку Database desktop. Выбираем пункт меню «Tools»
à
«Alias Manager»*
У нас
открылось окно «Alias Manager». Нажмем на кнопку «New».
В поле Database Alias введем название нашей базы
данных, ну, например, StorePrj. В поле Path введем
путь к каталогу, в котором на прошлом уроке вы сохранили созданную таблицу
товаров. Для быстрого выбора пути можно воспользоваться кнопкой Browse. Driver
type оставим Standart*.
Теперь я
расскажу о том, для чего нам нужно создавать Alias. Дело в том, что в будущем мы
можем захотеть переместить наши таблицы баз данных в другой каталог, или вообще
на другой компьютер, где, возможно, придется расположить на другом диске. А
представьте себе, что все пути к таблицам в программе жестко заданы? Это
придется переписывать всею программу! Ужас! А тут мы взяли да и изменили путь в
настройках Alias-а.
А вот теперь
будем программировать. Создаем новый проект, присваиваем форме имя frmWares.
Положим на
форму TTable*
Назовем его
tbWares. Свойство DatabaseName
установим в StorePrj (вот нам и пригодился Alias). После это мы можем установить
свойство TableName путем выбора из выпадающего списка. Пока у нас там только
одна таблица – созданная нами wares.db. Свойство Active установим в true.
Затем добавим
компонент TDataSource*.
Назовем его
dsWares. Свойство DataSet установим в tbWares.
Затем добавим
компонент TDBGrid*
Назовем его
dbgWares. Свойство DataSource установим в
dsWares. Затем добавим TDBNavigator*.
Назовем его
dbnWares. Свойство DataSource установим в
dsWares. Запускаем программу. Теперь мы можем
редактировать таблицу товаров.
При помощи
компонента TDBNavigator мы можем добавлять запись,
удалять, применять изменения, которые внесли непосредственно в таблицу (кнопка
*),
перемещаться по базе данных, отменять последние изменения. Если непосредственно
в таблице вы отредактируете строчку и перейдете на другую, то изменения
автоматически применятся.
Скриншоты, помеченные знаком * ,
являются цитатами и иллюстрациями
программного продукта "Delphi", авторское
право на который принадлежит "Borland Software
Corporation".
|