Creación de Listas con punteros en VFP

30/08/2003 - 05:19 por Tere | Informe spam
Hola. Les escribo porque necesito saber como se puede implementar una
lista en Visual Fox. Con lista me refiero a un nodo que apunta al
siguiente a traves de 1 puntero y asi sucesivamente todos los nodos
apuntando al que le sigue (es al estilo del Lenguaje C)
Es para un trabajo práctico en la facultad, y nuestro profesor nos ha
dicho que la estructura del nodo podría implementarse con una clase que
contenga variables con los datos que queremos almacenar, y simular un
puntero con una variable que guarde el nombre del siguiente nodo (las
sucesivas clase creadas.) a alquien se le ocurre como podría
implementar esto? Si me mandan algun ejemplo con código muchisimo mejor!
Desde ya muchísimas gracias. Saludos a todos.



PortalFox :: Nada corre como un zorro
http://www.portalfox.com

PortalFox - NNTP Forum Gateway
 

Leer las respuestas

#1 yo_no_compro_en_pcbox
31/08/2003 - 00:45 | Informe spam
DEFINE CLASS nodolista AS custom
Name = "nodolista"
anterior = .Null.
siguiente = .Null.
item = .Null.
ENDDEFINE

Esto es básicamente lo que piedes.

Despues podrías añadirle método Insertar por ejemplo de la siguiente forma

*-- INSERTAR
LPARAMETERS loItem, lcDestino

*-- loObjeto a insertar
*-- lcDestino "A" anterior "S" siguiente
loNuevo = CREATEOBJECT(THIS.Class)
IF UPPER(lcDestino) = "S"
WITH lonuevo
.anterior = This
.siguiente= this.siguiente
.Item = loItem
ENDWITH
THIS.siguiente = lonuevo
ELSE
WITH lonuevo
.anterior = this.ANTERIOR
.siguiente= This
.Item = loItem
ENDWITH
THIS.anterior = lonuevo
ENDIF

Y también borrar, y otros que puedas necesitar.

Saludos.
José Luis.
"Tere" escribió en el mensaje
news:
Hola. Les escribo porque necesito saber como se puede implementar una
lista en Visual Fox. Con lista me refiero a un nodo que apunta al
siguiente a traves de 1 puntero y asi sucesivamente todos los nodos
apuntando al que le sigue (es al estilo del Lenguaje C)
Es para un trabajo práctico en la facultad, y nuestro profesor nos ha
dicho que la estructura del nodo podría implementarse con una clase que
contenga variables con los datos que queremos almacenar, y simular un
puntero con una variable que guarde el nombre del siguiente nodo (las
sucesivas clase creadas.) a alquien se le ocurre como podría
implementar esto? Si me mandan algun ejemplo con código muchisimo mejor!
Desde ya muchísimas gracias. Saludos a todos.



PortalFox :: Nada corre como un zorro
http://www.portalfox.com

PortalFox - NNTP Forum Gateway

Preguntas similares