I have looked at some source code using Attributes / Custom Atributes

Is it possible to use it to define a property’s value to conform to something like all Uppercase.

TMyObject = class
private
  MyName: string;
published
  [Uppercase]
  MyName: string read FMyName write FMyName;    
end;

so instead of using a setter procedure SetMyName that sets FMyName to uppercase, is there a way to achieve always having MyName as uppercase through attributes?

Thank you for any advice.