Con la idea de Lepe puedes usar el puntero para guardar un registro en cada nodo.
También te comento que dado que los objetos son a fin de cuentas punteros puedes guardar directamente objetos en cada nodo haciendo el moldeo adecuado:
Data := Pointer(UnObjeto) // asignar el objeto
UnObjeto := TUnObjeto(Data) // recuperar el objeto
Esto, claro está, no invalida el hecho de tener que liberar recursos como apunta delphi.com.ar usando el método Free del objeto en el evento OnDeletion.
// Saludos
|