Jason,

Here's some code I have in a form's Init to set up a treeview and imagelist controls.

* Create the OLEControl for the Treeview
.AddObject("Images","OLEControl","Comctl.ImageListCtrl")
.Images.Object.ImageHeight = 16
.Images.Object.ImageWidth = 16
.Images.Object.ListImages.Add(,"FoxHead",LoadPicture(lcStartDir+"fox.bmp"))
.Images.Object.ListImages.Add(,"NoFox",LoadPicture(lcStartDir+"nofox.ico"))
.AddObject("OLEControl1","OLEControl","Comctl.Treectrl")
	
WITH .OLEControl1
	.Top = 25
	.Left = 4
	.Height = 390
	.Width = 368
	.HideSelection = .F.
	.Visible = .T.
	.Object.Font.Size = 8  && 8 point font for the treeview
	.LabelEdit = 1
	.ImageList = THISFORM.PageFrame1.Page1.Images.Object
ENDWITH