Вопрос: Есть таблица Paradox, и у ней есть поле автоинкремент. Более того по этому полю сделан первичный индекс. Время от времени у поля слетает счетчик, причем назад... Т.е. например последнее присвоенное значение было 10, счетчик слетает назад на 5 и при добавлении новой записи автоинкремент выставляется на 5, но запись с таким значением уже была, естественно возникает ошибка "Key violation".
Ответ: ...нашел новый способ в дебрях интернета. Дело в том что значение автоинкремента хранится в фале по адресу $49, в итоге получаем такую программу (на Delphi)(код не мой, и изменять я его не стал, все работает):
Код | procedure SetAutoIncInTable(ATablePath:string;ANewAutoInc:integer); begin with TFileStream.Create(ATablePath,fmOpenReadWrite) do try Position:=$49; Write(ANewAutoInc,SizeOf(ANewAutoInc)); finally Free; end; end; |
единственное, что следует проверить чтобы файл не был никем не занят, а так все ОК. Проверял на разных файлах с различной структурой, все было отлично...
Предоставил lavish
|