topic-21800

Posts: 845

Joined: Sun Oct 09, 2005 05:36 PM

Sustituir Macro & en xHarbour
Posted: Wed Jun 22, 2011 11:02 PM

Hola foro

en Harbour hacia esto y me funcionaba:
cC := "Dia"+StrZero(DAY(dFec3),2)
::oTabla[x]:&cC := cVar

ya probe sin solucion asi:
::oTabla[x]:&(cC) := cVar

en xHarbour no funciona, no reemplaza el valor en el campo,
como le hago para hacer eso mismo aleatoriamente?
saludos
Paco

____________________

Paco

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: Sustituir Macro & en xHarbour
Posted: Thu Jun 23, 2011 03:13 AM

Safer than using macros:

OSend( ::oTabla[x], "_Dia"+StrZero(DAY(dFec3),2), cVar )

Regards

G. N. Rao.

Hyderabad, India

Posts: 845

Joined: Sun Oct 09, 2005 05:36 PM

Re: Sustituir Macro & en xHarbour (SOLUCIONADO)
Posted: Thu Jun 23, 2011 02:19 PM

FUNCIONA PERFECTO!!!!!

donde puedo ver el OSend ?
lo desconocia...

GRACIAS RAO

Saludos
PACO

____________________

Paco

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: Sustituir Macro & en xHarbour
Posted: Thu Jun 23, 2011 02:57 PM

OSend() is a FiveWin function.

uVal := Object:cData
is same as
uVal := OSend( Object, "cData" )

Object:cData := uNew
is same as
OSend( Object, "_cData", uNew )

Regards

G. N. Rao.

Hyderabad, India

Posts: 1789

Joined: Tue Oct 11, 2005 05:01 PM

Re: Sustituir Macro & en xHarbour
Posted: Thu Jun 23, 2011 11:08 PM

but macro not work.
error in evalution o error in implementation?

salu2

Salu2

Carlos Vargas

Desde Managua, Nicaragua (CA)

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: Sustituir Macro & en xHarbour
Posted: Thu Jun 23, 2011 11:54 PM

carlos vargas wrote:but macro not work.
error in evalution o error in implementation?

salu2

For me <object>:&<macroexpression> is working with xHarbour.

But I suggested OSend as a more dependable method.

Regards

G. N. Rao.

Hyderabad, India

FiveTech Support Forums