Здравствуйте, Luminarc!
У базы данных нет индексов, индексы есть у таблиц. Поэтому приведу пример создания индекса для таблицы Table. Поскольку Вы не захотели сказать, какого типа у Вас база данных, то придется применять универсальный язык SQL и соответствующий компонент для него - TQuery.
Кладете на форму компонент, в свойство DatabaseName прописываете имя Вашей базы данных (если она определена в BDE), Потом:
- для построения индекса
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Text:=‘CREATE INDEX Название_Индекса ON Название_Таблицы (А здесь записываете индексное выражение. В простейшем случае это будет название поля, по которому строится индекс)
{Например индекс по полю Main_id}
Query1.SQL.Text:=‘CREATE INDEX Main_id ON Table (Main_id)‘;
Query1.SQL.ExecSQL; {Строим индекс}
- удаление индекса
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Text:=‘DROP INDEX Main_id‘;
Query1.SQL.ExecSQL; {Удаление}