TClassCodeGeneratorOptions
pt
SetClassName
Assign
CleanObjectClassName
TCodeGeneratorOptions
SetOPtions
create