Create (TCodeGenPascalUnit)
Destroy (TCodeGenPascalUnit)
GetAsPascal (TCodeGenPascalUnit)
Save (TCodeGenPascalUnit)