FiveTech Software tech support forums

... clase llamada "tmaint", en tiempo de ejecucion. Podría alguien ayudarme con eso. He tratado de hacerlo asi: FUNCTION AddObjetoAClase( oObject, cDataName ) __clsAddMsg( oObject:ClassH, cDataName,&( "{ | | _" + cDataName + "() }" ) , HB_OO_MSG_METHOD,, HB_OO_CLSTP_EXPORTED ...

Esta funcion de Harbour añade una data a un objeto: __objAddData( <oObject>, <cDataName> ) --> oObject Muchas gracias, no es exacatamente lo que quería pero me servirá: FUNCTION uAddDataInObj( oObject, cDataName, uElvalor ) __objAddData( ...

Esta funcion de Harbour añade una data a un objeto:

__objAddData( <oObject>, <cDataName> ) --> oObject

Patricio,

Esta es la forma sencilla:

__objAddData( oObject, cSymbol, nScope, lPersistent, lCase )

Code: Select all  Expand view

myVar := pApp():New()
__objAddData( myVar, "Z")
 

Saludos,

Andres Reyes

Otto,

No, you are just creating an alias for the same font object.

To create a copy of an object:

oNew := oClone( oObject )

James

... to which object the window refers to. My class stores the alias name of the browse and i was hoping to reference this in the action of the menu (oObject:cAlias->TICKET_NBR) but i don't know how to reference the Object that is selected. Any help will be appreciated Pete

... Carlos tambien puedes añadirle Datas nuevos (tanto en Harbour como xHarbour). Add a DATA to an already existing class Syntax __objAddData( <oObject>, <cDataName> ) --> oObject Arguments <oObject> is the object to work on. <cDataName> is the symbol name of the new ...

... Carlos tambien puedes añadirle Datas nuevos (tanto en Harbour como xHarbour). Add a DATA to an already existing class Syntax __objAddData( <oObject>, <cDataName> ) --> oObject Arguments <oObject> is the object to work on. <cDataName> is the symbol name of the new ...

Anser, You can use __ClassSel( oObject:ClassH ) to retrieve an array with all DATA and METHOD names. If a name exists with an underscore at the beginning, then it is a DATA. Here you have an example to retrieve all DATA names: from FWH\source\function\odata.prg ...

... the objects oConnection:End() oConnection:=NIL oRecSet:End() oRecSet:=NIL I would like to know whether the oObject:End() followed by oObject:=NIL is the right method or not. Or is there any other way to do the same Regards Anser

... de esa forma. Pero uno siempre busca hacer las cosas mas dificiles :D Pero estudiando mas los objetos existe una funcion __objModMethod( oObject, cSymbol, nFuncPrt ) que reemplaza los punteros de las funciones de los methodos.. se podria utilizar el siguiente codigo para poder simular ...

is this what you mean ?

oObject:hObj

How to get the handle of object create by ToleAuto():new(XXX)

for example :

oObject := TOleAuto():New(xxx)

How to get the handel of oObject

... means that you have to have different load and save methods for each situation. This violates the polymorphism rule of OOP. You can't just call oObject:load() you have to use oObject:load1(), oObject:load2(), etc. depending on the situation. So you can't do generic things like pass any object ...

... means that you have to have different load and save methods for each situation. This violates the polymorphism rule of OOP. You can't just call oObject:load() you have to use oObject:load1(), oObject:load2(), etc. depending on the situation. So you can't do generic things like pass any object ...