Mega Code Archive

 

Categories / Delphi / ADO Database

 

How to regenerate all out of date indexes on a given table

Title: How to 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;