Dear Experts

I use following codes to add data in Treeview control

SELECT myTree
#DEFINE tvwFirst	0
#DEFINE tvwLast		1
#DEFINE tvwNext		2
#DEFINE tvwPrevious	3
#DEFINE tvwChild	4

WITH Thisform.OleTreeView.Nodes
	SCAN
		IF Empty(ParentID)
			.Add(,tvwFirst,NodeId,code+ ' '+Trim(NodeText))
		ELSE
			.Add(ParentID,tvwChild,NodeId,code +' '+Trim(NodeText))
		ENDIF
	ENDSCAN
ENDWITH

How to show all nodes text forecolor=rgb(225,0,0) and
How to show all child text forecolor=rgb(0,255,0)

Please help