Объекты типа TindexDef можно добавлять в список при помощи метода
function AddlndexDef: TindexDef;
Поиск объекта описания индекса осуществляет метод
function Find(const Name: String): TindexDef;
который возвращает найденный объект по заданному в параметре
Name имени индекса.
Пара методов
function FindlndexForFields(const Fields: string): TindexDef;
function GetlndexForFields(const Fields: String;
Caselnsensitive: Boolean): TindexDef;
находит объект описания индекса по списку полей, входящих в индекс. Если индекс не найден, ищется первый индекс, начинающийся с указанных полей. Первый из этих двух методов в случае неудачного поиска генерирует исключительную ситуацию
EDatabaseError, а второй возвращает
nil.
Список IndexDefs обновляется автоматически при открытии набора данных. Но метод
procedure Update; reintroduce;
обновляет список описаний индексов без открытия набора данных.
Знаете ли Вы, что в 1974 - 1980 годах профессор Стефан Маринов из г. Грац, Австрия, проделал серию экспериментов, в которых показал, что Земля движется по отношению к некоторой космической системе отсчета со скоростью 360±30 км/с, которая явно имеет какой-то абсолютный статус. Естественно, ему не давали нигде выступать и он вынужден был начать выпуск своего научного журнала "Deutsche Physik", где объяснял открытое им явление. Подробнее читайте в FAQ по эфирной физике.
