FiveTech Support Forums

Hola.
A mi me funciona asi.
__objAddData( Self, a )
__objSendMsg( Self, "_" + a , acp )

ruben Dario wrote:Hola.
A mi me funciona asi.
__objAddData( Self, a )
__objSendMsg( Self, "_" + a , acp )

METHOD Set( cName, xValue ) CLASS TPublic

   IF oSend(Self,cName)=NIL
      __objAddData( Self, cName )
   ENDIF

   oSend(Self,cName,xValue)

RETURN Self

ruben Dario wrote:Si trabajo con la misma version.

Podrias ajustarlso asi. te deberia de funcionar.
Estas modificando la Clase TPublic.
Saludos , mira si te funciona que error de da, me comentas o me escribes.

Code (fw): Select all Collapse

    METHOD Set( cName, xValue ) CLASS TPublic

       IF oSend(Self,cName)=NIL
          __objAddData( Self, cName )
       ENDIF

       __objSendMs(Self,cName,xValue)

    RETURN Self

No funciona....no inicio el ejecutable

Alguna sugerencia?

No.
Pero solamente estas ejecutardo la CLase Tpublic.
Colocalo asi.

__objSendMsg( Self, "_" + cName,xValue )

Me imagino que pasas el Nombre (cName) y el valor para inicializarlo (xValue)
Muestrame como haces el llamado a esta clase.

ruben Dario wrote:No.
Pero solamente estas ejecutardo la CLase Tpublic.
Colocalo asi.

__objSendMsg( Self, "_" + cName,xValue )

Me imagino que pasas el Nombre (cName) y el valor para inicializarlo (xValue)
Muestrame como haces el llamado a esta clase.

__objSendMsg( Self, "_" + cName,uValue )

Tocaria probar la clase que modificaste para ver si es el problema.
Si gustas mandamela yo la reprodusco para ver que pasa.
o muestra el trozo de codigo donde defines el llamado de la clase.
Yo trabajo con Harbur 3.2 y Bcc 7.2 y Fwh 18.2

Bueno ya se soluciono, era que no habias probado con el cambio sugerido.

ruben Dario wrote:Bueno ya se soluciono, era que no habias probado con el cambio sugerido.