Create GenericListener.pas