>OK, thank you. So I'll left this code commented by #if 0
>Maybe somewhere in the future we will return to this subject.
Hi Przemek. I thank you.
Due to your changes I can use OLE byref with no problems.
Best regards,
Toninho.
__
Faça ligações p
On Fri, 14 Aug 2009, toni...@fwi wrote:
Hi,
> Only to you understand scenario, I have a simple call:
> ---cut---
> local nRet:= 1, cTitular := "", cCnpj := "", cNumeroSerie := "",
> cEmissor := "", cInicioValidade := "", cFimValidade := "", cMensagem
> := ""
> nRet = ::oNFEUtil:PegaDadosCertifica
Hi Przemek,
>Thank you for your test but you added above if() statement to wrong
>function hb_oleItemToVariantRef() and I asked about hb_oleVariantToItem().
>To avoid possible typos I'll commit some modifications to olecore.c
>and I'll add code disabled by '#if 0' which uses such alternative
>meth
On Fri, 14 Aug 2009, toni...@fwi wrote:
Hi,
> >Please also add at beginning of function hb_oleVariantToItem()
> >
> > if( pVariant->n1.n2.vt == VT_VARIANT | VT_BYREF )
> > pVariant = pVariant->n1.n2.n3.pvarVal;
> >
> >and then test again.
> Hi Przemek, same result: all var is nil and now g
>Please also add at beginning of function hb_oleVariantToItem()
>
> if( pVariant->n1.n2.vt == VT_VARIANT | VT_BYREF )
> pVariant = pVariant->n1.n2.n3.pvarVal;
>
>and then test again.
Hi Przemek, same result: all var is nil and now gpf too.
---cut---
static void hb_oleItemToVariantRef( VARI
On Fri, 14 Aug 2009, toni...@fwi wrote:
Hi,
> >If possible please make simple test and add at the end of
> >hb_oleItemToVariantRef() code:
> > if( pVarRef )
> > {
> > pVarRef->n1.n2.vt = VT_VARIANT | VT_BYREF;
> > pVarRef->n1.n2.n3.pvarVal = pVariant;
> > }
> I do it and now all b
Hi Przemek,
>If possible please make simple test and add at the end of
>hb_oleItemToVariantRef() code:
>
> if( pVarRef )
> {
> pVarRef->n1.n2.vt = VT_VARIANT | VT_BYREF;
> pVarRef->n1.n2.n3.pvarVal = pVariant;
> }
I do it and now all byref vars return NIL
>Now my list of OLE TODO
On Thu, 13 Aug 2009, toni...@fwi wrote:
Hi,
> > Please test it after:
> Przemek, seems that all is working fine.
Thanks for the information though it probably needs deeper tests
to eliminate possible typos in different translations. I've found
in xHarbour many wrong translations and no one has b
