I
import
Unregistered / Unconfirmed
GUEST, unregistred user!
var
lnNode: TTreeNode;
begin
lnNode := TreeView1.Items.GetFirstNode;
while not (lnNode = nil) do begin
lnNode.Expand(False);
lnNode := lnNode.GetNextSibling;
end;
end;
lnNode: TTreeNode;
begin
lnNode := TreeView1.Items.GetFirstNode;
while not (lnNode = nil) do begin
lnNode.Expand(False);
lnNode := lnNode.GetNextSibling;
end;
end;