Attibute en Clases Delphi

[elrayo76]

Estoy rediseñando unas clases que tengo y hay algo que no se como resolverlo. Es algo que lo he visto en .NET pero no creo que nunca lo he visto en Delphi.

.NET

[PrimaryKey] ---> esto es un atributo de la propiedad
Property int Codigo
{
get {}
set {}
}

Esto mismo que muestro de .NET no se como resolverlo en Delphi. Me refiero a poder indicar algún atributo a una propiedad. Desde ya que los atributos no exiten como tales en el lenguaje, sino que son definidos por el programador. Lo que si existe es el tipo Attibute para poder definirlos como tales.

Espero haberme explicado y cualquier cosa no duden en preguntar.

Saludos,
El Rayo

[Casimiro Notevi]

Como a todos los novatos, te recuerdo que pongas los tags al código fuente, ejemplo:



Gracias


¡Ah!, pero si no eres novato


.

[[maeyanes]]

Hola...

Desde Delphi 2010 (si más no recuerdo), existe la clase TCustomAttribute la cual sirve para lograr lo que quieres. Esta clase se puede usar junto con el RTTI extendido para obtener los valores en tiempo de ejecución.

Un pequeño ejemplo:

Código Delphi [-]
PrimaryKey = class(TCustomAttribute);


TMyObject = class
  [PrimaryKey]
  Key: Integer;
  // ... más código...
end;

Aquí puedes buscar más información: Introducing Attributes.

También en la ayuda de Delphi puedes buscar más información.



Saludos...

[elrayo76]

Perdón por no poner los tags correspondientes, fue un descuido que no volverá a ocurrir.

También gracias por la respuesta.

Saludos,
El Rayo