for ANode in TreeView1.Nodes do
begin
if ANode.ID='BBS' then
begin
BBSNode:=ANode;
Break;
end;
end;