RTTI und Enum mit Werten, Bug oder Feature?

[Rainer Wolff]

Hallo,

ich bin grad über folgendes Phänomen gestolpert: Wenn ich einen Enum definiere und mittels RTTI meine Klasse auslese, funzt alles ganz normal (Code unten). Wenn ich den Enum-Elementen jetzt aber Werte zuweise:

Code:

 tenum1 = (fRot=3, fBlau=10);

werden sie in der Schleife nicht mehr aufgelistet.
Isses ein Bug oder kennt jemand dafür nen Grund?

Gruß Rainer

Code:

  tenum1 = (fRot, fBlau);

  tmyclass = class(TPersistent)
  private
    Fs1: tenum1;
  public
    property s1:tenum1 read Fs1 write Fs1;
  end;

procedure TForm8.FormCreate(Sender: TObject);
var
  context: TRttiContext;
  aType: TRttiType;
  aProperty: TRttiProperty;
  attrib: TCustomAttribute;
begin
  aType:=context.GetType(tmyclass);
  for aProperty in aType.GetProperties do
  begin
    Caption:=caption+aProperty.Name;
  end;

[DeddyH]

Auf die Schnelle gefunden: http://www.delphipraxis.net/149875-t...uer-enums.html

[himitsu]

Sobald auch nur ein Wert explizit definiert wurde

Delphi-Quellcode:

=irgendas

, gibt es in der RTTI keine Namensliste der Werte mehr.

Der "Bug" ist seit Jahrzehnten bekannt, mein Bugfix-Vorschlag wurde abgewiesen ... das ist halt so.

[edit] Ein F5 bitte, her Ober.

[Thomas_K]

Vieleicht hilft dir dieser Blog Artikel weiter http://softwareonastring.com/2014/08...coding-freedom.