Rtti und Attribute in Delphi 2010

[Stevie]

Attribute sind Teil der RTTI, von daher musst du sie auch darüber auslesen.

Delphi-Quellcode:

var
  ctx: TRttiContext;
  t: TRttiType;
  m: TRttiMethod;
  a: TCustomAttribute;
begin
  t := ctx.GetType(TMyClass);
  m := t.GetMethod('MyProc');
  for a in m.GetAttributes do
  begin
    if a is MyAttribute then
    begin
      ShowMessageFmt('Name: %s, age: %d', [MyAttribute(a).Name, MyAttribute(a).Age]);
    end;
  end;
end;