Delphi Examples: DbiRegenIndex

<< Click to Display Table of Contents >>

Navigation:  »No topics above this level«

Delphi Examples: DbiRegenIndex

Return to chapter overview

Regenerate an index to ensure that it is up to date.

This example uses the following input:

 fDbiRegenIndex(Table1, 'ByCompany', '', 1);

 

The procedure is:

procedure fDbiRegenIndex(Tbl: TTable; IndexName, TagName: String; IndexNum: Word);

begin

 Check(DbiRegenIndex(Tbl.DBHandle, nil, PChar(Tbl.TableName), nil,

   PChar(IndexName), PChar(TagName), IndexNum));

end;