Реферат Курсовая Конспект
Компонент TTable - раздел Программирование, Компонент Ttable. Содержание Обзор Создание Таблиц С Помощью Компонента Ttab...
|
Компонент TTable. Содержание Обзор Создание таблиц с помощью компонента TTable Заключение 1. Обзор 2. На этом небольшом уроке мы завершим изучение возможностей создания таблиц.Как Вы помните, мы уже освоили два способа создания таблиц - с помощью утилиты Database Desktop, входящей в поставку Delphi урок 11 и с помощью SQL-запросов урок 12 , которые можно использовать как в WISQL Windows Interactive SQL - клиентская часть Local InterBase , так и в компоненте TQuery. Теперь мы рассмотрим, как можно создавать локальные таблицы в режиме выполнения с помощью компонента TTable. 3. Создание таблиц с помощью компонента TTable Для создания таблиц компонент TTable имеет метод CreateTable. Этот метод создает новую пустую таблицу заданной структуры. Данный метод процедура может создавать только локальные таблицы формата dBase или Paradox.
Компонент TTable можно поместить на форму в режиме проектирования или создать динамически во время выполнения.В последнем случае перед использованием его необходимо создать, например, с помощью следующей конструкции ? var Table1 TTable Table1 Create nil Перед вызовом метода CreateTable необходимо установить значения свойств TableType - тип таблицы DatabaseName - база данных TableName - имя таблицы FieldDefs - массив описаний полей IndexDefs - массив описаний индексов.
Свойство TableType имеет тип TTableType и определяет тип таблицы в базе данных.Если это свойство установлено в ttDefault, тип таблицы определяется по расширению файла, содержащего эту таблицу Расширение .DB или без расширения таблица Paradox Расширение .DBF таблица dBASE Расширение .TXT таблица ASCII текстовый файл . Если значение свойства TableType не равно ttDefault, создаваемая таблица всегда будет иметь установленный тип, вне зависимости от расширения ttASCII текстовый файл ttDBase таблица dBASE ttParadox таблица Paradox.
Свойство DatabaseName определяет базу данных, в которой находится таблица. Это свойство может содержать BDE алиас директорий для локальных БД директорий и имя файла базы данных для Local InterBase локальный алиас, определенный через компонент TDatabase.
Свойство TableName определяет имя таблицы базы данных. Свойство FieldDefs имеющее тип TFieldDefs для существующей таблицы содержит информацию обо всех полях таблицы.Эта информация доступна только в режиме выполнения и хранится в виде массива экземпляров класса TFieldDef, хранящих данные о физических полях таблицы т.о. вычисляемые на уровне клиента поля не имеют своего объекта TFieldDef . Число полей определяется свойством Count, а доступ к элементам массива осуществляется через свойство Items ? property Items Index Integer TFieldDef При создании таблицы, перед вызовом метода CreateTable, нужно сформировать эти элементы.
Для этого у класса TFieldDefs имеется метод Add ? procedure Add const Name string DataType TFieldType Size Word Required Boolean Параметр Name, имеющий тип string, определяет имя поля. Параметр DataType тип TFieldType обозначает тип поля. Он может иметь одно из следующих значений, смысл которых ясен из их наименования ? TFieldType ftUnknown, ftString, ftSmallint, ftInteger, ftWord, ftBoolean, ftFloat, ftCurrency, ftBCD, ftDate, ftTime, ftDateTime, ftBytes, ftVarBytes, ftBlob, ftMemo, ftGraphic Параметр Size тип word представляет собой размер поля. Этот параметр имеет смысл только для полей типа ftString, ftBytes, ftVarBytes, ftBlob, ftMemo, ftGraphic, размер которых может сильно варьироваться.
Поля остальных типов всегда имеют строго фиксированный размер, так что данный параметр для них не принимается во внимание.
Четвертый параметр - Required - определяет, может ли поле иметь пустое значение при записи в базу данных. Если значение этого параметра - true, то поле является требуемым , т.е. не может иметь пустого значения.В противном случае поле не является требуемым и, следовательно, допускает запись значения NULL. Отметим, что в документации по Delphi и online-справочнике допущена ошибка - там отсутствует упоминание о четвертом параметре для метода Add. Если Вы желаете индексировать таблицу по одному или нескольким полям, используйте метод Add для свойства IndexDefs, которое, как можно догадаться, также является объектом, т.е. экземпляром класса TIndexDefs. Свойство IndexDefs для существующей таблицы содержит информацию обо всех индексах таблицы.
Эта информация доступна только в режиме выполнения и хранится в виде массива экземпляров класса TIndexDef, хранящих данные об индексах таблицы. Число индексов определяется свойством Count, а доступ к элементам массива осуществляется через свойство Items ? property Items Index Integer TIndexDef Метод Add класса TIndexDefs имеет следующий вид ? procedure Add const Name, Fields string Options TIndexOptions Параметр Name, имеющий тип string, определяет имя индекса. Параметр Fields также имеющий тип string обозначает имя поля, которое должно быть индексировано, т.е. имя индексируемого поля. Составной индекс, использующий несколько полей, может быть задан списком имен полей, разделенных точкой с запятой , например Field1 Field2 Field4. Последний параметр - Options - определяет тип индекса. Он может иметь набор значений, описываемых типом TIndexOptions ? TIndexOptions set of ixPrimary, ixUnique, ixDescending, ixCaseInsensitive, ixExpression Поясним эти значения. ixPrimary обозначает первичный ключ, ixUnique - уникальный индекс, ixDescending - индекс, отсортированный по уменьшению значений для строк - в порядке, обратном алфавитному , ixCaseInsensitive - индекс, нечувствительный к регистру букв, ixExpression - индекс по выражению.
Отметим, что упоминание о последнем значении также отсутствует в документации и online-справочнике. Опция ixExpression позволяет для таблиц формата dBase создавать индекс по выражению.
Для этого достаточно в параметре Fields указать желаемое выражение, например Field1 Field2 Field3 . Вообще говоря, не все опции индексов применимы ко всем форматам таблиц.
Ниже мы приведем список допустимых значений для таблиц dBase и Paradox ? Опции индексов dBASE Paradox ixPrimary ь ixUnique ь ь ixDescending ь ь ixCaseInsensitive ь ixExpression ь Необходимо придерживаться указанного порядка применения опций индексов во избежание некорректной работы.
Следует отметить, что для формата Paradox опция ixUnique может использоваться только вместе с опцией ixPrimary см. пример на диске - Рис. 0-1 . Итак, после заполнения всех указанных выше свойств и вызова методов Add для FieldDefs и IndexDefs необходимо вызвать метод класса TTable - CreateTable ? with Table1 do begin DatabaseName dbdemos TableName mytest TableType ttParadox Создать поля with FieldDefs do begin Add Surname , ftString, 30, true Add Name , ftString, 25, true Add Patronymic , ftString, 25, true Add Age , ftInteger, 0, false Add Weight , ftFloat, 0, false end Сгенерировать индексы with IndexDefs do begin Add I Name , Surname Name Patronymic , ixPrimary, ixUnique Add I Age , Age , ixCaseInsensitive end CreateTable end Индексы можно сгенерировать и не только при создании таблицы.
Для того чтобы сгенерировать индексы для существующей таблицы, нужно вызвать метод AddIndex класса TTable, набор параметров которого полностью повторяет набор параметров для метода Add класса TIndexDefs ? procedure AddIndex const Name, Fields string Options TIndexOptions При этом для метода AddIndex справедливы все замечания по поводу записи полей и опций индексов, сделанные выше. 1. Заключение Итак, мы познакомились с еще одним способом создания таблиц - способом, использующим метод CreateTable класса TTable. Использование данного способа придаст Вашему приложению максимальную гибкость, и Вы сможете строить локальные таблицы на лету . Сопутствующим методом является метод AddIndex класса TTable, позволяющий создавать индексы для уже существующей таблицы.
Подчеркнем еще раз, что данный способ применим только для локальных таблиц. Более общий способ состоит в использовании SQL-запросов, который мы рассматривали на уроке 12.
– Конец работы –
Используемые теги: компонент, TTable0.054
Если Вам нужно дополнительный материал на эту тему, или Вы не нашли то, что искали, рекомендуем воспользоваться поиском по нашей базе работ: Компонент TTable
Если этот материал оказался полезным для Вас, Вы можете сохранить его на свою страничку в социальных сетях:
Твитнуть |
Новости и инфо для студентов