ПОИСК
Категории книг
ОПРОС
Вопрос: Какой язык программирования вы предпочитаете
С/C++
Delphi
Visual Basic
Perl
Java
PHP
ASP
Другой
ЭТО ПОЛЕЗНО!
ОБРАТНАЯ СВЯЗЬ

/ Главная / Программирование / Иллюстрированный самоучитель по Delphi 7 для профессионалов
Иллюстрированный самоучитель по Delphi 7 для профессионалов

 

Использование описаний индексов

Описания индексов наряду с описаниями полей (см. г/г. 13) также используются при создании новых таблиц БД. Для каждого планируемого индекса перед вызовом метода CreateTable необходимо создать или скопировать из существующего набора данных соответствующее описание. Тогда при создании таблицы индексы будут добавлены автоматически:

with Tablel do

 begin

DatabaseName := 'DBDEMOS';

TableType := ttParadox;

TableName := 'DemoTable';

...

{Создание описаний полей}

...

with IndexDefs do begin Clear;

AddlndexDef; with Items[0] do 

begin

Name := ' ' ; Fields := 'Fieldl'; Options := [ixPrimary, ixUnique];

  end;

AddlndexDef; with Items[1] do

 begin

Name := 'Secondlndex'; Fields := 'Fieldl;Field2'; 

Options := [ixCaselnsensitive]; 

end;

 end;

CreateTable; 

end;

При создании описаний индексов использован метод AddlndexDef, который при каждом вызове добавляет к списку Items объекта TIndexDefs новый объект TindexDef. Таким образом сначала создается первичный индекс (в таблицах Paradox он не имеет имени), затем вторичный индекс SecondIndex. Для каждого описания обязательно определяются составляющие индекс поля и параметры индекса (свойства Fields и options).

 



Компьютерные книги © 2006-2013
computers.plib.ru