puntero de clase
Publicado por Cess (2 intervenciones) el 19/04/2003 07:03:13
buenas,
estoy trabajando en un mensajero que utiliza clases, que sirve para intercambiar mensajes en tiempo real.
utilizo un treeview para mostrar los contactos, es igual al mensajero de hotmail (MSN Messenger)
en cada nodo del treeview guardo un puntero a una clase que indica los datos del usuario.
nodo.tag = objptr(clase)
con eso guardo la direccion en memoria de la clase, pero no puedo asignar el puntero a la clase de regreso.
eso lo estoy tratando la API CopyMemory, sin exito
User is un clase declarada en un procedimento local
private sub ejemplo
dim User as TUser
Call CopyMemory(ByVal User, ByVal Nodo.Tag, 4)
end sub
he tratado de todo algunas veces mi programa hace crash y e otras me sale bad dll conversion.
como puedo hacer para poder leerlo bien.
la funcion la tengo declarada como
Public Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)
gracias de antemano
estoy trabajando en un mensajero que utiliza clases, que sirve para intercambiar mensajes en tiempo real.
utilizo un treeview para mostrar los contactos, es igual al mensajero de hotmail (MSN Messenger)
en cada nodo del treeview guardo un puntero a una clase que indica los datos del usuario.
nodo.tag = objptr(clase)
con eso guardo la direccion en memoria de la clase, pero no puedo asignar el puntero a la clase de regreso.
eso lo estoy tratando la API CopyMemory, sin exito
User is un clase declarada en un procedimento local
private sub ejemplo
dim User as TUser
Call CopyMemory(ByVal User, ByVal Nodo.Tag, 4)
end sub
he tratado de todo algunas veces mi programa hace crash y e otras me sale bad dll conversion.
como puedo hacer para poder leerlo bien.
la funcion la tengo declarada como
Public Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)
gracias de antemano
Valora esta pregunta
0