...alle Indexe einer Tabelle neu aufbauen?

Autor: invisible

Kategorie: Datenbanken

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