
- •Содержание
- •Лабораторная работа №13 Изучение среды разработчика
- •Лабораторная работа № 14 События в Delphi
- •Лабораторная работа №15 Примеры создания модулей
- •Лабораторная работа №16 Примеры использования компонентов Label, Edit, Memo
- •Лабораторная работа №17 Примеры использования командных кнопок
- •Лабораторная работа№18 Изучение методов и свойств
- •Лабораторная работа№19 Пример использования компонентов RadioGroup и CheckListBox, Radiobutton, CheckBox.
- •Лабораторная работа№20 Примеры использования компонентов ListBox и ComboBox.
- •Лабораторная работа№21 Примеры использования компонента StringGrid.
- •Лабораторная работа №22 Отладка программ
- •Лабораторная работа№23 Примеры использования компонентов Image, Shape, Timer.
- •Лабораторная работа №24 Работа с формами
- •Лабораторная работа№25 Примеры использования компонента MainMenu и PopupMenu.
- •Лабораторная работа№26 Примеры использования компонентов OpenDialog, SaveDialog и FontDialog.
- •Лабораторная работа№27 Создание мультимедийных приложений.
- •Лабораторная работа№28 Печать текстовая и графическая.
- •Лабораторная работа№29 Работа с базами данных
- •Регистрация базы данных – создание псевдонима
- •Создание программы в Delphi
- •Лабораторная работа№30 Сортировка и фильтрация данных
- •Лабораторная работа№31 Вычисляемые поля. Перенос полей на форму
Регистрация базы данных – создание псевдонима
Это необходимо сделать, чтобы будущая программа могла быть независимой от месторасположения выполняемого файла программы. Однако этого можно не делать и в программе указать конкретный путь к базе данных, но тогда при изменении месторасположения самой базы на диске, программа просто не будет знать, где искать базу и откажется работать, так как ее расположение жестко зашито в выполняемом коде exe- файла.
Для регистрации псевдонима используется программа BDE (Database Engine), ее можно запустить из ПАНЕЛИ УПРАВЛЕНИЯ или из меню ПРОГРАММЫ подменю BORLAND DELPHI
Запустится программа (внимание в оригинале она на английском языке).
Для создания псевдонима выбираем меню
Object-New
Далее смотри рисунок
нажимаем OK (будет выбран стандартный драйвер баз данных для PARADOX и DBASE)
Далее появится следующее окно – слева будет создан новый псевдоним STANDATR1, а справа параметры псевдонима.
Необходимо присвоить имя новому псевдониму (переименовать STANDART1 на telefon) и указать путь к базе в строке PATH справа, как на рисунке
Затем нажать синюю стрелку (вверху окна на панели инструментов), чтобы изменения вступили в силу.
Таким образом, псевдоним зарегистрирован и BDE Administrator можно закрыть.
Создание программы в Delphi
Запускаем Delphi, открываем новый проект (File-New-Application)
Для работы понадобятся следующие компоненты
Table
- для связи данных с псевдонимом (Закладка BDE)
Datasource - для связи набора данных с визуальными компонентами (Закладка DataAccess)
Эти компоненты не визуальные и в программе отображаться не будут.
DBGrid
– для отображения данных
DBNavigator – для управления данными
Оба компонента находятся на закладке Data Controls
Button – для функции закрытия программы.
В результате на форме будем иметь
Теперь необходимо связать данные с визуальными компонентами, чтобы в таблице DBGrid отобразились данные из таблицы telef.db.
Для компонента Table1 присваиваем свойства в Object inspector (табличка слева):
DatabaseName – telefon
TableName – telef.db
Active – true
Таким образом, мы подключили набор данных к программе
Для компонента Datasource1 устанавливаем свойство DataSet – Table1
Для компонента DBGrid1 устанавливаем свойство DataSource – Datasource1
Для компонента DBNavigator1 устанавливаем свойство DataSource – Datasource1
Таким образом, мы смогли отобразить данные в таблице DBGrid1.
Внешний вид формы имеет вид
Теперь можно в компоненте DBGRID заменить английские заголовки на русские
Для этого дважды щелкаем по сетке (DBGrid)и видим картинку и в ней жмём правую кнопку и выбираем пункт Add All Field как на картинке
и далее
Так как сетка не отображает поля типа MEMO, то последнее поле можно удалить из списка, а для его отображения используем компонент DBMemo на панели Data Controls.
Теперь, выделив каждое поле по очереди, меняем ему свойство Title-Caption на русское значение. Там же можно поменять ширину колонки – свойство Width (ширина).
Для отображения поля примечаний помещаем на форму метку Label1 (Закладка Standart) и изменяем ей свойство Caption на «ПРИМЕЧАНИЯ». Ниже располагаем компонент DBMemo1 (Закладка Data Controls) и изменяем ему свойство DataSource – на DataSource1, а в свойстве DataFields выбираем из списка поле Prim.
Для компонента DBNavigator1 находим свойство Hints, нажимаем на кнопочку с точками и переписываем английские названия на русские как на рисунке. После этого OK. И в свойстве ShowHint ставим True. В свойстве Datasource выбираем Datasource1.
Теперь пишем обработчик для кнопки «Закрыть». Два раза щелкаем мышкой на ней между словами Begin и End пишем Close.
5. Компилируем проект и запускаем программу.
При наведении мышки на кнопки навигатора можно узнать о назначении каждой кнопки
Контрольные вопросы:
1.Назовите основные типы полей создаваемых таблиц Paradox.
2.Создание таблицы с использованием программы Database Desktop.
3.Для чего применяются псевдонимы при создании таблицы в программе BDE Administrator?
4. Для чего используются компоненты Table, Datasource, DBGrid, DBNavigator?
5. Каким образом заменяются английские заголовки на русские в компоненте DBGrid?
6. Как организовать взаимосвязь компонентов Table, Datasource, DBGrid, DBNavigator для корректной работы приложения?