Ændre font farve midlertidigt på tree node

Har fundet ud af det:

void __fastcall TMainForm::ItemsTVCustomDrawItem(TCustomTreeView *Sender,
      TTreeNode *Node, TCustomDrawState State, bool &DefaultDraw)
{
    if (kriterie for hvilken node der skal farves)
    {
        Sender->Canvas->Font->Color = clMedGray;
    }   
}