🚀 go-pugleaf

I am using Windows 2000 Version 5.00.2195; Borland C++ Builder Version 5.0
Build 12.34 Update Pack 1; Access 2000 version 9.0.4402 SR-1 and Crystal
Reports product 8.5.0.217. I have a C++ application that needs to have
exclusive control of the Access database. When I use this function first
everything works fine (it gains exclusive access; updates the database and
returns shared access). However, if I first run a report that uses TTX
definitions and a query dataset and then try to do the exclusive update I
receive a "database locked by user admin" error and cannot obtain the
exclusive lock. I have set break points and examined the .LDL file and found
the Crystal OCX is locking the data base and not releasing the lock.

I have tried the following code in the form destroy event:

      rptQuery->Active = false;

      qryDates->Close();

      Screen->Cursor = crArrow;

      StrProc->Active = false;

      rpt->CloseEngine();

      dmHpms->Conn->Connected = false;

      dmHpms->Conn->Mode = cmShareDenyNone;

      Application->ProcessMessages();

      dmHpms->Conn->Connected = true;

This does not change the lock! Has anyone encountered a post report locking
problem with Access 2000?