>CLEAR > >PUBLIC oComUtil, oFoxEvent, oMSMQEvent > >* Setup up event handler to receive the messages >oMSMQEvent = create("msmq.msmqevent") >oComUtil = create("vfpcom.comutil") >oFoxEvents = create("FoxEvent") > >? EVENTHANDLER(oMSMQEvent,oFoxEvent) > > >DEFINE CLASS FoxEvent AS custom OLEPUBLIC > IMPLEMENTS FoxEvents IN "MSMQ.Msmqevent" > > Procedure FoxEvents_Arrived(oQueue,Cursor) > WAIT WINDOW "Message Arrived" TIMEOUT 1 > ENDPROC > > Procedure FoxEvents_ArrivedError(Queue,ErrorCode,Cursor) > WAIT WINDOW "Message Arrived Error" TIMEOUT 1 > ENDPROC > >ENDDEFINE >Is that all the events in FoxEvents? A class that implements an interface has to have methods for every event in the interface, even if they do nothing.