Hi Franco,
I've don this in the past. I seem to have lost the code, but I'm sure you have to use the GETINTERFACE funtion in order to VFP recognize the objectmodel of the EventInfo class.
Without testing, I think it should be something like
oEventInfo = GETINTERFACE("EventInfo","CRVIEWER9LibCtl.CRVEventInfo")<PRE>
oCollection = oEventInfo.GetFields()
oField = oCollection.Item(fcol.SelectedFieldIndex)
MESSAGEBOX(oField.Value)
Walter,