Borrar items de un TreeView

[ibarrols]

Hola Foro!!!

Quiero borrar todos los items(viejos) para luego cargarlos con distintos items(nuevos) y no se como hacerlo...

será que alguien me podrá ayudar???

Muchas Gracias....

[andres1569]

TreeView1.Items.Clear;


Muchas gracias ...

... de nada

[Roy]

... y si cada ítem tiene la propiedad Data apuntando a estructuras que utilizan memoria (creados con 'new' de un tipo 'record', por ejemplo)? La función 'clear' libera esa memoria también ?

Gracias.

[delphi.com.ar]

No

[delphi.com.ar]

Es un error MUY COMÚN, para eso existe un evento OnDeletion que se ejecuta cada ves que se elimina un nodo, a ahí puedes encargarte de eliminar lo que tengas en la propiedad Data.

Y agrego que para que esto sea mas rápido, evitando que re-dibuje el árbol cada ves que se elimina un nodo, te conviene hacer algo así:
TreeView1.Items.BeginUpdate;
try
TreeView1.Items.Clear;
finally
TreeView1.Items.EndUpdate;
end;

También lo puedes hacer a la hora de cargar los nodos. Estoy seguro que si tu árbol es tiene muchos nodos me lo vas a agradecer...

Saludos!

PD:
El hilo anterior fue para competir con Román en la respuesta mas corta! :D

[Roy]

Estaba por agradecer la respuesta corta del moderador.... aunque reconozco que con algo de ironía, aunque tampoco mi pregunta daba para mucho más. Pero minuto a minuto la respuesta se fue ampliando (más rápido de lo esperado) y lo he probado todo y funciona muy bien.

MUCHAS GRACIAS !! (perdonando las mayúsculas esta vez....)

Roy

[roman]

Posteado originalmente por delphi.com.ar

TreeView1.Items.BeginUpdate;
try
TreeView1.Items.Clear;
finally
TreeView1.Items.EndUpdate;
end;


Una observación: son innecesarias las llamadas a BeginUpdate y EndUpdate así como el encajarlo en un bloque try-finally-end ya que todo esto lo hace internamente el método Clear.

Posteado originalmente por delphi.com.ar
PD:
El hilo anterior fue para competir con Román en la respuesta mas corta! :D [/B]

Buen intento pero no considero que me hayas superado :p
En la que yo dí no había nada más que decir. Bastaba que buscara "Pos" en la ayuda para ver los parámetros ya que la función no tiene ninguna complicación. Sin embargo en este caso es más difícil encontrar en qué parte de la ayuda dice que Data no se libera.

:D

// Saludos

[andres1569]

F1

[delphi.com.ar]

Posteado originalmente por roman
[B]Una observación: son innecesarias las llamadas a BeginUpdate y EndUpdate así como el encajarlo en un bloque try-finally-end ya que todo esto lo hace internamente el método Clear.

En la versión de Delphi que yo tengo (5), no es así, llama directamente a la API, pero acabo de comprobar que en la 7 si...


Esto es un problema!!!!

[Roy]

¿ En qué tipo de documentación se encuentra ese tipo de información: la que explica el funcionamiento interno de un 'Clear', por ejemplo ?

Roy

[delphi.com.ar]

En la ayuda.. pero no es muy extensa en este tema en particular. Lo que nosotros estamos discutiendo es el código que ejecuta el clear, puedes acceder a él rápidamente haciendo Ctrl+Click en el método, o abriendo la unit ComCtrls.

Saludos!

[roman]

Posteado originalmente por Roy
¿ En qué tipo de documentación se encuentra ese tipo de información: la que explica el funcionamiento interno de un 'Clear', por ejemplo ?


En realidad en ninguna Roy, estamos haciendo "trampa" al revisar el código fuente de Delphi. Lo cierto es que debería estar en la documentación lo mismo que lo del Data. Las llamadas a Begin Update y EndUpdate no son tan problemáticas ya que pueden anidarse unas con otras y lo único que hacen es aumentar o decrementar un contador. Pero cada bloque try es un aumento a la carga de un programa y si puede evitarse qué mejor. Ya que no está documentado lo más correcto sería proceder como delphi.com.ar para más seguridad. Si estuviera documentado uno podría omitirlo tranquilamente.

// Saludos

[Roy]

Gracias por la aclaración. :)

Roy