Reindeksiranje brisanje i kreiranje index fajlova dbf

Pozdrav !!!

KOristim Delphi, baza dbase format baze DBF

Sva tabela mi koristi index * .mdx..
Pitanje ?

1. Kako i na koji nacin da najednostavnije reindeksiram tabele odnosno da izbrisem i ponov kreiram index-e za sve tabele
2. Zelim da kodom prodjem kroz sve fajlove -tabele u nekom direktoriju i da odaradi brisanje i kreiranje index-a

Moj kod:

Table1.Active := false;
Table1.Exclusive := true;
Table1.DeleteIndex('jmb');
Table1.DeleteIndex('rb');
Table1.AddIndex('jmb','jmb',[]);
Table1.AddIndex('rb','rb',[]);

Table1.Exclusive := false;
Table1.Open;

... ovo uradim za sve tabele i opet mi izbaci gresku da su Table is busy !!!a sve sam od A do Ž provjeri sadrzaj index-a
i sve indekse i sve tabele..

da li ima komponenta za dbf da sve to sama odradi ili ako ima zaista source code kompletan za nesto ovo

Hvala puno !!!

Potraži DbiRegenIndex i DbiRegenIndexes u BDE helpu (bde32.hlp).

Inače, ovo pitanje je za Delphi grupu.

Potpis

Do not be a help vampire (http://slash7.com/pages/vampires), use the google.

How to ask questions the smart way:
http://www.catb.org/~esr/faqs/smart-questions.html
http://solair.eunet.rs/~fangor...stions/smart-questions.sr.html

vkdf je odlična kontrola.
Podržava DBF i indexe, besplatna, potraži ne net-u

Hvala ti drug puno malo lutam ali jos je nisam naso link direktan

Kad bih znao kako, postavio bih rar file uz poruku ...
Pošalji mail, pa ti pošalje. Nije veliko, a besplatno je.