Using Ancestor Class

Just create the property and add the attribute the same way you did with the field:




var
  Prop: TCodeMemberProperty;
begin                                     
  Prop :=   Args.CodeType.AddProperty('UserId', '', '', '', mvPublic);
  Field.AddAttribute('Column').AddRawArgument('''userid''');
end;