Индексные файлы

← →
Jann © (2004-06-21 11:37) [0]

Уважаемые програмеры!
Как удалить индексные файлы. Непойму у меня на машине, где писалась прога файлы удаляются, а на другой тачке нет.

← →
Anatoly Podgoretsky © (2004-06-21 11:40) [1]

Наверно ошибка в программе?

← →
Jann © (2004-06-21 11:46) [2]

Вот мой код, что может быть не так:
procedure TForm1.FormCreate(Sender: TObject);
begin
AdsTable1.Exclusive := true;
AdsTable1.Active := true;
AdsTable1.DeleteIndex("po");
AdsTable1.Active := false;
AdsTable1.AddIndex("po","po_rn",[]);
AdsTable1.Exclusive := false;
AdsTable1.Active := true;
AdsTable2.Exclusive := true;
AdsTable2.Active := true;
AdsTable2.DeleteIndex("nach");
AdsTable2.Active := false;
AdsTable2.AddIndex("nach","rn",[]);
AdsTable2.Exclusive := false;
AdsTable2.Active := true;
end;

← →
Anatoly Podgoretsky © (2004-06-21 11:55) [3]

Так убери все строчки AddIndex

← →
Jann © (2004-06-21 12:04) [4]

Так мне же надо, чтоб потом индексный файл создался поновой!

← →
Jann © (2004-06-21 14:52) [5]

Так мне же надо, чтоб потом индексный файл создался поновой!

Читаем вопрос "Как удалить индексные файлы", а ты создаешь индексы

Правильно, я их сначало убиваю, а потом создаю поновой. Пробовал делать просто индексацию, так у меня индексные файлы после каждого открытия програмы становятся все больше и больше.

Удалено модератором

Индексные файлы Найти похожие ветки