>Yes, I was thinking of having a class that could return references to it's own instances of the required classes.

In VFP8 it seems simple.

public goFactory
goFactory = CREATEOBJECT("cusFactory")

DEFINE CLASS cusFactory as Custom
	ADD OBJECT ioSingleton as "collection"
	FUNCTION new(tcClass,tcLib)
		WITH THIS
			IF .ioSingleton.GetKey(tcClass) = 0
				DEBUGOUT "create object"
				.ioSingleton.Add(NEWOBJECT(tcClass,tcLib),tcClass)
			ENDIF 
			DEBUGOUT "return reference"
			RETURN .ioSingleton(tcClass)
		ENDWITH 
	ENDFUNC 
ENDDEFINE

You could hang the factory off _SCREEN, or your own goApp object, however you manage such things.