Anoche estaba un poco denso de tanto rumiar el fallo, a ver si consigo resumir lo que quiero, es fácil:
Lo que necesito es cargar un árbol de nodos desde disco sin necesidad de que se muestre en pantalla. Y no conozco en Delphi una clase que me de esa funcionalidad sin tener que meter un componente en el Form. He tenido que usar el TTreeView porque es donde único dispongo del método LoadFromFile.
Mi clase no necesita mostrar el árbol en ningun componente, es una clase solo para procesar informacion de cualquier árbol que se le pase en el constructor mediante un TTreeNodes.
En cuanto al error que me daba, creo que estaba en el constructor:
Código:
Estaba haciendo esto:
N:=TTreeNode.Create(TNs);
Y he cambiado a esto:
N:=TNs.GetFirstNode;
Ahora ya me funciona. Lo ves correcto?.
En el caso A, N apunta al primer nodo del arbol TNs? o a donde? Digo 'apunta' porque pienso en punteros, al hablar de clases es correcto?. Estoy javaintoxicado.
En el caso B, N apunta al primer nodo del arbol TNs y cualquier modificacion de N afectaria a TNs?. Y en el destructor ya no debo llamar al Free creo?.
En tú código no entiendo esta parte en el constructor de TMiTreeNode:
Código:
FNodes := TTreeNodes.Create(nil); FNodes := TNd
Primero creas el TTreeNodes y luego los reasignas?.
Y porqué usas properties pudiendo acceder a las variables declaradas public para ello. Se que son como los getters y setters de java pero en este caso no veo la necesidad,.. o si?
Gracias, saludos.