Delphi-Help

Главная Статьи DBASE и DBF Перегенерировать все индексы с истекшей датой

Перегенерировать все индексы с истекшей датой

Оцените материал
(0 голосов)


Перегенерировать все индексы с истекшей датой

procedure TForm1.Button1Click(Sender: TObject);
 begin
   Table.Close;
   Table.Exclusive := True;
   Table.Open;
   DbiRegenIndexes(Table.Handle);
   Table.Close;
 end;
Прочитано 5437 раз

Авторизация



Счетчики