Add an OnLogin event to TSphinxConfig

[Weetch_Russell (Russell Weetch)]

Add an event to allow secondary validation of a login after the initial validation have been done, something along the lines of

procedure OnLogin(Args: TLoginArgs; var Accept: boolean; var RejectionString: string);