Un buen descubrimiento!

Por fin encontré una forma de devolver el resultado de una función como a
mí me gusta!. Esto, para mi que estoy lejos de ser un gurú, esta forma es
todo un descubrimiento.

****************
oObj = prueba()
? oObj.cFunciona
? oObj.cComentario

Function prueba
oo = NewObject('custom')
oo.AddProperty('cFunciona','funciona!')
oo.AddProperty('cComentario','Buen descubrimiento!')
Return oo
EndFunc

****************
Return puede devolver una objeto!. por si se sirva a alguien ignorante
como yo. jaja

Mario Esquivel Bado
Sistemas Epsilon
Desarrollo de Sistemas de Gestión Administrativa Financiera y Contable

Buen ejemplo con una pqueña adaptacion para cuando se dice reemplazar por
propiedades las variables publicas...

Dario David Puccio
El Cyber_Gaucho
www.chispazodetradicion.com.ar

"Mario Esquivel Bado" escribió en el mensaje
news:

Por fin encontré una forma de devolver el resultado de una función como a
mí me gusta!. Esto, para mi que estoy lejos de ser un gurú, esta forma es
todo un descubrimiento.

****************
oObj = prueba()
? oObj.cFunciona
? oObj.cComentario

Function prueba
oo = NewObject('custom')
oo.AddProperty('cFunciona','funciona!')
oo.AddProperty('cComentario','Buen descubrimiento!')
Return oo
EndFunc

****************
Return puede devolver una objeto!. por si se sirva a alguien ignorante
como yo. jaja

Mario Esquivel Bado
Sistemas Epsilon
Desarrollo de Sistemas de Gestión Administrativa Financiera y Contable

Podrias usar crear un objeto vacio y agregarle tus propiedades


loRetVal = CREATEOBJECT("Empty")

ADDPROPERTY(loRetVal,"Pedazos",0)
ADDPROPERTY(loRetVal,"Descrip","")
ADDPROPERTY(loRetVal,"Ancho",0)
ADDPROPERTY(loRetVal,"Largo",0)
ADDPROPERTY(loRetVal,'Desperdicio',0)


Saludos Cordiales

Cruz
Mérida, Yucatán, México
Skype: mario.cruz.pech

Vota por Chichén Itzá como una de las nuevas 7 maravillas del mundo
http://www.new7wonders.com/index.php



"Dario David Puccio" escribió en el mensaje de
noticias:OS#

Buen ejemplo con una pqueña adaptacion para cuando se dice reemplazar por
propiedades las variables publicas...

Dario David Puccio
El Cyber_Gaucho
www.chispazodetradicion.com.ar

"Mario Esquivel Bado" escribió en el mensaje
news:

Por fin encontré una forma de devolver el resultado de una función como
a mí me gusta!. Esto, para mi que estoy lejos de ser un gurú, esta forma
es todo un descubrimiento.

****************
oObj = prueba()
? oObj.cFunciona
? oObj.cComentario

Function prueba
oo = NewObject('custom')
oo.AddProperty('cFunciona','funciona!')
oo.AddProperty('cComentario','Buen descubrimiento!')
Return oo
EndFunc

****************
Return puede devolver una objeto!. por si se sirva a alguien ignorante
como yo. jaja

Mario Esquivel Bado
Sistemas Epsilon
Desarrollo de Sistemas de Gestión Administrativa Financiera y Contable