Silvio,
Class TDataBase has a destructor method, so when the object gets out of scope then it gets called
change local oDbf into static oDbf (or keep it in an array) so the object is not destroyed
Antonio Linares wrote:ok, thanks, in Class TDataBase remove this line:
// DESTRUCTOR td_destroy()
Also comment out this code:
/*
PROCEDURE td_destroy() CLASS TDataBase
::End()
RETURN
*/