OCX Events

[Nick Hilder]

Hi Jose
I have been back working on the Codejock stuff again.
I have lots more of it working
You helped me with this event
EVENT EventAddedEx( @upEvent )
You showed me how is did this
e := TOleAuto():New( PointerToInt( upEvent ) )
I could get to the real event object, this is greate
You gave me this wrapper to do it
XA_FUNC( POINTERTOINT )
{
hb_retnl( (long) hb_parptr( 1 ) );
}
I have one that is nearly the same, I'm hoping I just need a slight
different wrapper
Event DayMetrics( dDay, @uMetrics)
It's missing the p. (the other one was up) Valtype returns a P just like the
other one did
Here's what the OLE Viewer shows me
void EventChangedEx(CalendarEvent* pEvent); This one works now
void DayMetrics(DATE Day, IDatePickerDayMetrics* Metrics);

[jfgimenez]

Nick,
> Event DayMetrics( dDay, @uMetrics)
>
> It's missing the p. (the other one was up) Valtype returns a P just like
> the other one did
'u' means unknown, while 'up' means unknown pointer
> void EventChangedEx(CalendarEvent* pEvent); This one works now
> void DayMetrics(DATE Day, IDatePickerDayMetrics* Metrics);
'IDatePickerDayMetrics * Metrics' seems to be a pointer to an interface, but
not a pointer to an instance of that interface. Since that parameter is
passed by reference, it seems that you sould fill it with a pointer to an
interface of type 'IDatePickerDayMetrics', which seems to be not so easy
from .prg level. A sample written in VB or Delphi could help here, in order
to know what should be returned.
--
Regards,
Jose F. Gimenez
http://www.xailer.com
http://www.xailer.info

[jfgimenez]

Nick,
> Event DayMetrics( dDay, @uMetrics)
>
> It's missing the p. (the other one was up) Valtype returns a P just like
> the other one did
'u' means unknown, while 'up' means unknown pointer
> void EventChangedEx(CalendarEvent* pEvent); This one works now
> void DayMetrics(DATE Day, IDatePickerDayMetrics* Metrics);
'IDatePickerDayMetrics * Metrics' seems to be a pointer to an interface, but
not a pointer to an instance of that interface. Since that parameter is
passed by reference, it seems that you sould fill it with a pointer to an
interface of type 'IDatePickerDayMetrics', which seems to be not so easy
from .prg level. A sample written in VB or Delphi could help here, in order
to know what should be returned.
--
Regards,
Jose F. Gimenez
http://www.xailer.com
http://www.xailer.info

[Nick Hilder]

I will see what I can find
"Jose F. Gimenez" <jfgimenez@wanadoo.es> wrote in message
news:4868b84d$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> Nick,
>
>> Event DayMetrics( dDay, @uMetrics)
>>
>> It's missing the p. (the other one was up) Valtype returns a P just like
>> the other one did
>
> 'u' means unknown, while 'up' means unknown pointer
>
>
>> void EventChangedEx(CalendarEvent* pEvent); This one works now
>> void DayMetrics(DATE Day, IDatePickerDayMetrics* Metrics);
>
> 'IDatePickerDayMetrics * Metrics' seems to be a pointer to an interface,
> but not a pointer to an instance of that interface. Since that parameter
> is passed by reference, it seems that you sould fill it with a pointer to
> an interface of type 'IDatePickerDayMetrics', which seems to be not so
> easy from .prg level. A sample written in VB or Delphi could help here, in
> order to know what should be returned.
>
> --
> Regards,
>
> Jose F. Gimenez
> http://www.xailer.com
> http://www.xailer.info
>

[Nick Hilder]

I will see what I can find
"Jose F. Gimenez" <jfgimenez@wanadoo.es> wrote in message
news:4868b84d$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> Nick,
>
>> Event DayMetrics( dDay, @uMetrics)
>>
>> It's missing the p. (the other one was up) Valtype returns a P just like
>> the other one did
>
> 'u' means unknown, while 'up' means unknown pointer
>
>
>> void EventChangedEx(CalendarEvent* pEvent); This one works now
>> void DayMetrics(DATE Day, IDatePickerDayMetrics* Metrics);
>
> 'IDatePickerDayMetrics * Metrics' seems to be a pointer to an interface,
> but not a pointer to an instance of that interface. Since that parameter
> is passed by reference, it seems that you sould fill it with a pointer to
> an interface of type 'IDatePickerDayMetrics', which seems to be not so
> easy from .prg level. A sample written in VB or Delphi could help here, in
> order to know what should be returned.
>
> --
> Regards,
>
> Jose F. Gimenez
> http://www.xailer.com
> http://www.xailer.info
>