Delphi-PRAXiS - [D2006] Set of enummerieren

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Algorithmen, Datenstrukturen und Klassendesign (https://www.delphipraxis.net/78-algorithmen-datenstrukturen-und-klassendesign/)

- - [D2006] Set of enummerieren (https://www.delphipraxis.net/159215-%5Bd2006%5D-set-enummerieren.html)

fs999

18. Mär 2011 13:41

[D2006] Set of enummerieren

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

18. Mär 2011 14:21

AW: [D2006] Set of enummerieren

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

18. Mär 2011 15:10

AW: [D2006] Set of enummerieren

ja genau !

Vielen Dank !

fs999

18. Mär 2011 15:30

AW: [D2006] Set of enummerieren

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

Alle Zeitangaben in WEZ +1. Es ist jetzt 15:05 Uhr.