Unit: edbcomps

TEDBServerSessionEvent = procedure(Sender: TObject; EventType:
      TEDBServerSessionEventType; const Session: TEDBServerSession;
      var UserObject: TObject) of object

This type is used for the TEDBEngine OnServerSessionEvent event.