Can I display a node in standard ttreeview component with bold style without Custom drawing?

Can I display a node in standard TTreeView component with bold style without custom drawing? Time-to-time I receive the question how I realized a selection by the bold font for some nodes in the SMReport Explorer form.Today I have decided to describe this very simple way (but very useful). It does not require an override of any custom drawing methods/events, creatinga new component etc. It's a real standard way.**********************************************************The standard Windows Treeview control have a few state flags (TVIS_BOLD and TVIS_CUT in our example), due to which it's possible to reach wished.At first, let's write the procedure SetNodeState:procedure SetNodeState(node: TTreeNode; Flags: Integer);var tvi: TTVItem;begin FillChar(tvi, SizeOf(tvi), 0); tvi.hItem := node.ItemID; tvi.Mask := TVIF_STATE; tvi.StateMask := TVIS_BOLD or TVIS_CUT; tvi.State := Flags; TreeView_SetItem(node.Handle, tvi);end;And now we can set a wished flags:SetNodeState(node, TVIS_BOLD) - to set the node as BoldSetNodeState(node, TVIS_CUT) - to set the node as CuttedSetNodeState(node, TVIS_BOLD or TVIS_CUT) - to set the node as Bold andCuttedSetNodeState(node, 0) - to set a node as normal*******************************************