All,

I use a builder to create composite classes.

The code is as follows:

FUNCTION SubClass
LPARAMETER tcBaseClass,tcBaseClassLibrary,tcNewClass,tcNewClassLibrary

CREATE CLASS ;
(tcNewClass) ;
OF ;
(tcNewClassLibrary) ;
AS ;
(tcBaseClass) ;
FROM ;
(tcBaseClassLibrary) ;
NOWAIT

loObject = .NULL.
FOR EACH loForm IN _SCREEN.FORMS
IF UPPER(loForm.CAPTION) # UPPER(tcNewClass)
LOOP
ENDIF
loObject = loForm.CONTROLS[1]
EXIT
ENDFOR
RETURN loObject

I use the loObject reference to change properties and then use

ACTIVATE WINDOW "Class Designer"
KEYBOARD "{Ctrl+W}"

to close the class designer.

If I create one object, all is well. If I create two objects, neigher Class Designers close.

Is there another way to create an object and store it in a VCX file?
Is there another way to reference the created object?
Is there another way to save the class and close the Class Designer?

TIA

Rex