`TVisStream`
pt		Write
pt		WriteLn
pt		SetStream

`TtiVisitor`
pt		AcceptVisitor
pt		VisitBranch
pt		GetVisited
pt		SetVisited
pt		SetDepth
		Create
		VisitorControllerClass
		Execute

`TtiBaseObject`
pt		QueryInterface
pt		_AddRef
pt		_Release
		CreateWithRefCounting
		AfterConstruction
		BeforeDestruction
		NewInstance
		TestValid