[littlePCgenius]

Доброго времени суток, подскажите плиз как переиндексировать DBF. Действие привязать к кнопке меню.

[Страдалецъ]

Вот что нам сообщают по этому вопросу вражеские источники:

Код:

1 2 3 4

if DbiRegenIndexes( Table1.Handle ) = DBIERR_NONE then      ShowMessage( 'OK' )    else      ShowMessage( 'NOPE' );

[littlePCgenius]

Сообщение от Страдалецъ

Вот что нам сообщают по этому вопросу вражеские источники:

Код:

сделала немного иначе:

Код:

1 2 3 4

DataModule1.OKSMDataSet.Close; DataModule1.OKSMDataSet.Exclusive:=true; DataModule1.OKSMDataSet.Open; DataModule1.OKSMDataSet.Reindex;