bool ExpansionEnabled;
이렇게 bool 변수를 하나 Form의 멤버로(혹은 전역으로) 선언하시고,

하위 노드를 열 수 있게 하고 싶을땐 true로 아닐땐 false 로 변경하게끔 해 두신후

TreeView의 OnExpanding Event Handler를 여셔서
AllowExpansion = ExpansionEnabled; 라고 두시면 됩니다.

ex)
멤버나 전역으로 선언 bool ExpansionEnabled;

//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
    ExpansionEnabled = false;
    TreeView1->ShowButtons = ExpansionEnabled; // 십자버튼마저 안보이게 하시고 싶다면 이렇게
}
//---------------------------------------------------------------------------

void __fastcall TForm1::TreeView1Expanding(TObject *Sender,
      TTreeNode *Node, bool &AllowExpansion)
{
    AllowExpansion = ExpansionEnabled;
}
//---------------------------------------------------------------------------


이범상 님이 쓰신 글 :
: 안녕하세요.
: 언제나 여기서 많은 도움 받아가고 있는 사람입니다. ^^
: 이번 질문은 TreeView에서 특정 노드의 하위 노드를 안보이게 하는 방법입니다.
:
: ========================= 트리뷰구조 =========================
: A001
:     -B001
: A002
:     -B002
:     -B003
:         -C001
:     -B004
:         -C002
:         -C003
:         -C004
:         -C005
: =============================================================
:
: 위와 같은 구조에서 B003과 그 밑의 노드들을 안보이게 하다가
: 다시 보이게 하려고 합니다.
:
: 일시적으로 안보이게 해주는 방법이 있습니까???
:
: 고수님 갈켜주십시요. ^^