Expandir y Contraer ListView

[xmalmorthen]

Hola que tal amigos mi duda es sobre como expandir y contraer los items de un listview, de manera que ese codigo se pueda poner dentro del evento click de un boton y al momento de presionarlo el listview contraiga o expanda todos los items que contenga segun sea el caso...

de antemano gracias...

[[xEsk]]

Hola,

La classe TTreeNode tiene dos metodos que realizan lo que buscas:

Código Delphi [-]
procedure TTreeNode.Expand(Recurse: Boolean);
procedure TTreeNode.Collapse(Recurse: Boolean);

Luego, el componente TTreeView tiene otros dos metodos, que sirven para contraer y expandir todos los items:

Código Delphi [-]
procedure TCustomTreeView.FullExpand;
procedure TCustomTreeView.FullCollapse;

Saludos.

[xmalmorthen]

gracias por tu respuesta, yo lo estava usando de una manera erronea ovbiamente, me sirvio mucho tu codigo...!!!