FiveTech Support Forums

Carlos,

Seria muy interesante si pudieses adaptar tus cambios a la Clase OLE propia de Harbour/xHarbour para que asi pueda incorporarse a los repositorios oficiales de Harbour/xHarbour.

Seguro que muchos usuarios de Harbour/xHarbour te lo agradeceran

Buen trabajo Carlos, gracias.

Dear Antonio,

I'm looking ways to handle events of Ole. I used CreateObject(programID) to create the object. I can use methods and properties but I can't figure to received events. I am not very good in Spanish.

My question is how can I handle events of objects created by function CreateObject(programID). I am already using the object in my app but I need to receive and handle fired events.

Thank you very much.

Jose

Jose,

FWH implements a function ActXEvents() (called from Class THActiveX METHOD ReadTypes), that read all the events names that the OLE object uses:

::aEvents = ActXEvents( cTypeLib, ::oOleAuto:__hObj )

Please review FWH\source\classes\activex.prg. Both Classes TActiveX (the first one implemented in FWH) and THActiveX are in that file.

PROCEDURE Event( ... ) CLASS THActiveX is the method that routes the events