...regenerate all out-of-date indexes on a given table?

procedure TForm1.Button1Click(Sender: TObject);
begin
  Table.Close;
  Table.Exclusive := True;
  Table.Open;
  DbiRegenIndexes(Table.Handle);
  Table.Close;
end;

printed from
www.swissdelphicenter.ch
developers knowledge base