You need your custom item type (ptrGC), as I've wrote previously. This would also need specially patched OLE interface code, which uses this item type, at least until our generic OLE interface doesn't get support for custom types.
But since you have your own OLE implementation, this don't seem to be a problem here. Brgds, Viktor On Sun, Feb 1, 2009 at 10:13 PM, Pritpal Bedi <[email protected]>wrote: > > Hi > > Investigating a little more I observed this: > > harbour/contrib/hbwin_win.ole.c/hb_oleVariantToItem() > > case VT_DATE | VT_BYREF: > hb_itemPutDL( pItem, ( long ) ( *pVariant->n1.n2.n3.pdblVal ) + > 2415019 ); > break; > > case VT_DATE: > hb_itemPutDL( pItem, ( long ) ( pVariant->n1.n2.n3.dblVal ) + > 2415019 ); > break; > > > > /* xHarbour Implementation > case VT_DATE | VT_BYREF: > hb_itemPutDTD( pItem, *pVariant->n1.n2.n3.pdblVal + (double) > 2415019 ); > break; > > case VT_DATE: > hb_itemPutDTD( pItem, pVariant->n1.n2.n3.dblVal + (double) 2415019 > ); > break; > */ > > And this is the point where I cannot fetch fraction > of a date-time value. xHarbour implementation requires > one more member in PHB_ITEM structure : > item.asDate.time > So I cannot implement at my own. > Any workarounds ? > > Regards > Pritpal Bedi > > -- > View this message in context: > http://www.nabble.com/Date-Time-Functions---Revisited-tp21767870p21780477.html > Sent from the Harbour - Dev mailing list archive at Nabble.com. > > _______________________________________________ > Harbour mailing list > [email protected] > http://lists.harbour-project.org/mailman/listinfo/harbour >
_______________________________________________ Harbour mailing list [email protected] http://lists.harbour-project.org/mailman/listinfo/harbour
