Hi franco,

If you don't use GETINTERFACE, vfp will not recognize the Eventinfo object and its properties and methods. I can't remember what I did exactly pass as the second parameter. I do remember it was something I found by opening the Craystal CRviewer in the object browser.

please try:

oEventinfo = GETINTERFACE(EventInfo,"ICRVEventInfo")

Sorry I could not help more at this stage, but I'm sure it must be something very close to the thing above.

Walter,




>Hi Walter,
>
>I have tried with GETINTERFACE it does not seem to work:OLEERROR.
>
>*** ActiveX Control Event ***
>Lparameters x, Y, eventinfo, usedefault
>oEventInfo = GETINTERFACE(EventInfo,"CRVIEWER9LibCtl.CRVEventInfo")
>oCollection = oEventInfo.GetFields() && OLEERROR 0x8002802b impossible to find element
>
>thanks for your time !!
>franco
>francofelosi@acut.it