First we need to open a connection to a database by providing the FairCom Database Engine with a user name, password and the database name.
Below is the code for Initialize():
procedure TForm1.Initialize;
begin
try
CtSession1.Active := true;
CtDatabase1.Database := 'tutorial';
CtDatabase1.Active := true;
except
on E : ECtError do Application.ShowException(E);
end;
end;