Hi Nadya,

LPARAM lcOClass,lcOClasslib,lcNClass,lcNClasslib
* lcOClass    - Class name
* lcOClasslib - VCX name
* lcNClass    - New class name
* lcNClasslib - New VCX name

LOCAL lcTClasslib
lcTClasslib=SYS(2023)+SYS(2015) && Temp. VCX

lcOClass=ALLT(lcOClass)
lcNClass=ALLT(lcNClass)

CREATE CLASSLIB (lcTClasslib) && Create temp. VCX
* Add class
ADD CLASS (lcOClass) OF (lcOClasslib) TO (lcTClasslib)
IF !UPPER(lcOClass)==UPPER(lcNClass)
   RENAME CLASS (lcOClass) OF (lcTClasslib) TO (lcNClass)
ENDIF
ADD CLASS (lcNClass) OF (lcTClasslib) TO (lcNClasslib)
*CLEAR ALL
DELE FILE (lcTClasslib+".*")

MartinJ

>Hi everybody,
>
>I'm not sure sure what did I wrong, but I keep getting some errors about DataEnvironment. So, I want to start fresh. I want to create a new class and copy all the properties I created for the other class with their comments and initial values and custom methods with the comments and code and add them to this new class.
>
>Do you know utility, which would help me to do this?
>
>Thanks a lot in advance.