TForm ----+ | TfrmParentForm
Unit:
testparent
(testparent.pas)
Methods:
procedure FormCreate(Sender: TObject);
procedure FormDestroy(Sender: TObject);
procedure OpenTables(fastOpen: boolean); virtual;
function CloseTables: boolean; virtual;
procedure FormCreate(Sender: TObject);
procedure FormDestroy(Sender: TObject);
procedure OpenTables(fastOpen: boolean); virtual;
fastOpen : Use the fast opening routine
function CloseTables: boolean; virtual;
result : Returns true if Ok otherwise false