Компонент TField
Объекты класса TField являются свойством объекта TDataSet (напомним, что некоторые свойства объектов сами являются объектами с их собственными наборами свойств, и TField - один из них).
Свойство Fields объекта типа TDataSet позволяет обращаться к отдельным полям набора данных. Свойство Fields является массивом или набором объектов TField, динамически создающимся во время выполнения приложения. Элементы массива соответствуют колонкам таблицы.
Объект TField не делает никаких предположений относительно типов данных, с которыми он связан. Он имеет несколько свойств, позволяющих установить или вернуть обратно значения поля, например, AsString, AsBoolean, AsFloat, AsInteger. Наиболее часто используются свойства Text (cтрока текста, выводимого в связанный с данным полем интерфейсный элемент) и FieldName (имя поля базы данных).
Fields Editor позволяет создать так называемый статический список полей таблицы, добавляемых к описанию класса формы. Когда впервые используются такие компоненты TDataSet, как компонент TTable или TQuery, список полей для них динамически генерируется в процессе выполнения приложения на основе имеющихся столбцов таблиц или результатов SQL-запроса. Fields Editor позволяет определить и затем модифицировать статический список компонентов Field на этапе проектирования приложения. При внесении колонок с использованием Fields Editor для каждого из полей, добавленных к TDataSet, возникают объекты TField, после чего можно увидеть эти поля в инспекторе объектов и использовать в приложениях их свойства, события и методы.
Использовать Fields Editor нужно следующим образом:
Разместить компонент TTable или TQuery на форме.
Установить свойство DatabaseName для TTable или TQuery.
Установить свойство TableName компонента TTable или свойство SQL компонента TQuery.
Выбрать компонент TDataSet на форме и нажать правую клавишу мыши, после чего появится контекстное меню.
Из контекстного меню выбрать Fields Еditor. Появится пустое окно с заголовком, совпадающим с именем компонента TTable.
Снова нажать правую клавишу мыши над пустым окном и из контекстного меню выб ать опцию Add Fields.
Имена всех колонок таблицы или запроса появятся в диалоговой панели Add Fields (рис. 1.)
Рис.1. Формирование списка полей
Выбрать поля, которые нужно внести в список объектов, и нажать OK.
Рис. 2. Сформированный список полей, доступных на этапе проектирования
Если требуется создать вычисляемое поле на основе имеющихся полей, нажать правую клавишу мыши и из контекстного меню выбрать New Field для создания нового поля на основе существующего или для создания вычисляемого поля (в дальнейшем следует создать код обработчика события OnCalcFields компонента TTable, где и производятся необходимые вычисления).
Если необходимо удалить статическое поле из списка полей в наборе данных, нужно нажать правую клавишу мыши и из контекстного меню выбрать Delete.
После того, как в Fields Editor добавлены поля, они появятся в инспекторе объектов, а ссылки на них - в h-файле формы.
Если теперь применить операцию drag-and-drop к выделенным в Fields Editor полям, перенеся их на форму, то можно получить готовую форму с необходимым набором интерфейсных элементов (в нашем случае - DBEdit, позволяющий отображать и редактировать строковые, числовые, денежные и другие поля, чьи значения представимы в виде строки символов, и DBImage, позволяющий отображать графические поля и использовать Clipboard для их редактирования). Если к такой форме добавить компонент TDBNavigator (этот компонент реализует основные методы TTable и TQuery, связанные с редактированием данных) и связать его с имеющимся компонентом TDataSource, а затем скомпилировать проект, получим приложение для просмотра и редактирования данных в таблице.
Рис. 3. Результат переноса на форму полей из Fields Editor
При работе Fields Editor создаются объекты, соответствующие видимым в инспекторе объектов полям. Эти объекты являются потомками объектного типа TField. Таблица 1 описывает существующие классы таких объектов:
Таблица 1. Потомки TField
Потомок | Описание |
TStringField | Текстовые данные фиксированной длины до 8192 символов. |
TAutoIncField | Целые числа от -2,147,483,648 до 2,147,483,647. Предназначен для нумерации ст ок в наборе данных. Потомок TIntegerField. |
TIntegerField | Целые числа от -2,147,483,648 до 2,147,483,647. |
TSmallIntField | Целые числа от -32768 до 32767. |
TWordField | Целые числа от 0 до 65535. |
TFloatField | Действительные числа с абсолютной величиной от 1.2x10e-324 до 1.7x10e308 с точностью до 15-16 цифры. |
TCurrencyField | Действительные числа с абсолютной величиной от 1.2x10e-324 до 1.7x10e308 с точностью до 15-16 цифры. |
TBooleanField | Значения true или false. |
TDateTimeField | Значения даты и времени. |
TDateField | Значения даты. |
TTimeField | Значения времени. |
TBlobField | Произвольное поле данных без ограничений размера. |
TBytesField | Произвольное поле данных без ограничений размера. |
TVarBytesField | Произвольное поле данных до 65535 символов с фактической длиной, представленной в первых двух байтах. |
TMemoField | Текст произвольной длины. |
TGraphicField | Графическое поле произвольной длины, например, битовый массив. |