| | TurboDB Studio | >TurboDB VCL < | roPTools | VDP | KALHelp | Downloads | Links | Suche | Kontakt | Impressum | |
|
Howto ... repair all indices in a single file database?
|
|
|
| ![]() |
|
Use for d := 0 to TdbDatabase1.DataSetCount - 1 do begin with TdbDatabase1.DataSets[d] as TTdbTable do begin for i := 0 to IndexDefs.Count - 1 do begin UpdateIndex(TdbTable1.IndexDefs[i].Name); end; end; end; Tested with TurboDB 4 für VCL.
|