lcSourceClassLib = GETFILE('VCX') lcNewClassLib = PUTFILE('','','VCX') lnClasses = AVCXCLASSES(arrClasses, lcSourceClassLib) CREATE CLASSLIB (lcNewClasslib) FOR ix = 1 TO lnClasses ADD CLASS (arrClasses[ix,1]) OF (lcSourceClassLib) TO (lcNewClassLib) endforCetin