|
|
|
When an application and/or process has completed operations with the database, it must release resources by closing the open files and disconnecting from the database engine.
Below is the code for Done():
procedure TForm1.Done;
begin
// close tables
TabOrderList.Active := false;
TabOrderItem.Active := false;
TabItemMast.Active := false;
TabCustMast.Active := false;
// disconnect from database
CtDatabase1.Active := false;
// logout from session
CtSession1.Active := false;
end;
