Duda con árboles y listas

[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.