Duda con árboles y listas

[[ElKurgan]]

Pues creo que se haría de forma parecida. Los nodos tienen una propiedad DATA que almacena punteros. Por tanto puedes almacenar en cada nodo un puntero al listview (o al item del mismo deseado).

Ejemplo de nodo que contiene un índice al elemento de una lista:

Código Delphi [-]
Node.Data := pointer(ListView.Items[ListView.ItemIndex]);

Para asociar un listview entero (no olvides que en Delphi las clases están definidas por punteros camuflados):

Código Delphi [-]
Node.Data := ListView;

Más o menos sería así. Investiga un poco las propiedades de los dos componentes y nos cuentas

Saludos

[ecfisa]

Hola.

Si tenes que trabajar con arboles y listas que has definido vos, se hace del mismo modo al que ElKurgan te ha dicho.

En ese caso se supone que tenes declarado algo como:

Código Delphi [-]
...
type
  PLista = ^Lista;
  Lista = record
    ...
    Dato: string;
    Prev: PLista;
    Prox: PLista;
  end;

  PArbol = ^Arbol;
  Arbol = record
    ...
    Lista: PLista;
    Izq: PArbol;
    Der: PArbol;
  end;
...

Luego, para que un nodo del árbol apunte a una lista:

Código Delphi [-]
procedure ApuntarALista(Arb: PArbol; Lst: PLista);
begin
  ...
  Arb^.Lista:= Lst;  
  ...
end;

Que en definitiva es lo mismo que te sugirió ElKurgan, aplicado a árboles y listas definidas por vos.


Saludos.