[keyboy]

Usa el evento OnCustomDrawItem del TreeView. Por ejemplo,

Código Delphi [-]
procedure TForm1.TreeView1CustomDrawItem(
  Sender: TCustomTreeView;
  Node: TTreeNode; State: TCustomDrawState; var DefaultDraw: Boolean);
begin
  with Sender as TTreeView do
    if Node.Level = 0 then
      Canvas.Font.Style := Canvas.Font.Style + [fsBold];
end;

Esto lo que hace es poner en negritas el texto de cualquier nodo a nivel cero, que creo, es lo que necesitas. En cualquier caso, el punto es que el parámetro Node es el nodo que se está pintando y puedes acceder a sus propiedades para determinar qué nodo es y saber cómo pintarlo.

Bye