Реферат: Разработка приложений базы данных "Командировка"

Delphi имеет мощное средство управления, которое позволяет перемещаться между объектами в таблице – навигатор DBNavigator.

Доступ к полям

Часто бывает так, что программе надо обратиться к полям базы данных. Свойство Fields набора данных описывает больше, чем содержащиеся в полях значения. Это свойство содержит также информацию о структуре таблицы. Например, свойство Fields может дать сведения об именах полей, типе данных в них, размере данных и их значениях для текущей записи. Объекты TTable имеют массивы полей. Эти массивы можно модифицировать, используя редактор полей для добавления, удаления и модификации определений полей.

В простейшем случае, когда приложению известно определение таблицы, поля могут быть доступны непосредственно, без необходимости определения, что они собой представляют или каков тип их данных. В нашем примере в таблице Readers поле №Билета – это первый столбец; поэтому Readers. Fields[0] равно значению №Билета для текущей выделенной записи. Заметьте, что массив начинается с индекса 0. Заметьте также, что для правильного обращения к данным должен быть известен тип данных.

Модификация полей в таблице

По умолчанию компонент TTable может использовать все поля связанной с ним таблицы. Кроме того, Delphi позволяет разработчику модифицировать используемые поля, основанные на вычислениях, и устанавливать атрибуты для каждого поля. Чтобы запросить редактор полей компонента TTable, дважды щелкните на экземпляре TTable. Это вызовет появление диалогового окна, которое позволяет вам добавлять, удалять и определять новые поля. Заголовок окна содержит имя формы и таблицы.

Это диалоговое окно обеспечивает также простой доступ к компонентам TFields. Поля являются производными от типа TField, с некоторой специальной информацией о типе данных. Например, если одно из полей – строка, поле должно иметь тип TStringField. Подобно другим компонентам, поля имеют свойства и события. Одно из преимуществ такого подхода состоит в том, что разные поля в таблице могут иметь разные свойства. Это удобно при необходимости защитить одно из полей от изменений, но разрешить пользователю модифицировать другие поля. Чтобы реализовать это, нужно установить значение свойства ReadOnly для поля, которое нужно защитить, равным True. Большое количество свойств поля определяет, как должны выравниваться данные – справа, слева или по центру отображаемого поля. Например, свойство Alignment. Кроме того, для чисел с плавающей запятой может быть установлено значение Precision (точность), которое указывает, как должны округляться числа. Можно установить отображаемые имена полей, в частности, русские имена.

Перемещение по записям

Навигатор обеспечивает возможность перемещения по таблице.

Создание интерфейса

Для создания интерфейса в Delphi обычно используются различные визуальные компоненты.

В работе использовалось меню, а не постраничная организация. Всего одна форма используется для отображения таблиц в зависимости от выбора пользователя. В некотором роде это переключение между таблицами на одной форме.

procedure TOsnForma. Rabotnik1Click (Sender: TObject);

begin

OsnTable. Active:=false;

OsnTable. TableName:='Работник';

Tag:=1;

Redakt;

OsnTable. Active:=true;

OsnForma. Caption:='Работник';

Komandirovka1. Enabled:=true;

Rabotnik1. Enabled:=false;

DenSredstva1. Enabled:=true;

Documenty1. Enabled:=true;

Detali1. Enabled:=true;

end;

procedure TOsnForma. DenSredstva1Click (Sender: TObject);

begin

OsnTable. Active:=false;

OsnTable. TableName:='Денежные средства';