Mega Code Archive

 

Categories / Delphi / ADO Database

 

Tablo indexlerinin tamir edilmesi

Function Tablo_Index_Tamiri(Table: TTable): Boolean; Begin Table.Active:= False; Table.Exclusive:= True; Table.Active:= True; DBIRegenIndexes(Table.Handle); Table.Active:= False; Table.Exclusive:= False; Table.Active:= True; Result:= True; End;