[D2006] Set of enummerieren

[fs999]

Hallo,

Ich möchte gerne, zu Debugzwecken, manche "Set of" Eigenschaften in Textform anzeigen. Wie zum Beispiel ComponentState, ControlState, usw.

Ich stosse aber immer auf das Problem eine Schleife zu machen oder zu finden was in der Eigenschaft ist.
Die komplette Enumeration habe ich gefunden, aber finde nicht wie ich nur die Werte in der Eigenschaft bekomme.

[Bummi]

etwas in der Art? uses TypInfo

Delphi-Quellcode:

  Memo1.Lines.add( SetToString(PTypeInfo(TypeInfo(TComponentState)), WORD(ComponentState),true));
  Memo1.Lines.add( GetEnumName(TypeInfo(TAlignMent), WORD(Memo1.AlignMent)));

[fs999]

ja genau !

Vielen Dank !

[fs999]

Funktioniert leider nicht.
SetToString in D2006 erwartet ein PPropInfo Parameter und nicht PTypeInfo.