Show/Hide Toolbars

TMS Data Modeler Documentation

Navigation: TMS Aurelius Export > Customization Script

Adding Version Attribute to Class Fields

Scroll Prev Top Next More

This example adds the attribute [Version] to any class field named "FVersion", regardless of the class it appears.


procedure OnColumnGenerated(Args: TColumnGeneratedArgs);
  if Args.Field.Name = 'FVersion' then


Suppose the original generated source code was this one:


    [Column('VERSION', [TColumnProp.Required])]
    FVersion: Integer;


With the script above, it will become this:


    [Column('VERSION', [TColumnProp.Required])]

    FVersion: Integer;