If you are using the BDE you may have experienced these problems, 'Index Out Of Date' or 'Blob has been modified' errors and data loss upon a bad reboot or an application crash.
There are a two ways to fix these problems each method will force the BDE to flush the cache after every post/delete and will simultaneously fix those problems.
1)Set the Local Share setting in the BDE Adminstrator to true (goto Configuration->System->Init->Local Share). Doing this will create Paradox.lck and Pdoxusrs.lck files in the the folders where the tables recide, they will only be automatically delete if you exit the application properly. So on startup of the application before opening the tables make sure to check the existence and delete those files, if you do not delete those files you might them get another notorious error "Directory is controlled by another .NET file".
if FileExists('c:\db\Paradox.lck') then
DeleteFile('c:\db\Paradox.lck');
if FileExists('c:\db\Pdoxusrs.lck') then
DeleteFile('c:\db\Pdoxusrs.lck');
{Open the Tables}
Table1.Active:=true;
....
2) Call DBISaveChanges(Table's.Handle) on the AfterPost and AfterDelete events of the Table's.
You can assign the same procedure to all the AfterPost and AfterDelete events of the all the Tables on your form
procedure Table1AfterPost(Sender : TDataSet);
begin
if(Sender is TBDEDataSet)then
DBISaveChanges(TBDEDataSet(Sender).Handle);
end
If you follow either of the options mentioned you should not have those problems but there is still a chance that the table may become corrupt and you can get a 'Index Out Of Date Error' and other various errors, though it is very rare, so I recommend a utility called PdxrBld which is based on Borland's Tutil32.dll
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.