Anzahl der Ord in Propertys herausfinden

[Net7]

Hi,

gibt es eine Möglichkeit die Anzahl von möglichen Einstellungen eines Objectpropertys herauszufinden??

Beispiel:

Delphi-Quellcode:

var
ordindex:integer; // gewählter index
ordname:string; // name des eingestellten ords
begin
test := GetPropValue(memo1, 'Name', true);
  memo1.Lines.Add(test);
  ordindex := GetOrdProp(memo1, 'ScrollBars');
  ordname := GetEnumProp(memo1, 'ScrollBars');
  memo1.Lines.Add(test);
...

Bei Defaulteinstellungen des Memos.ScrollBars gibt mir ordname natürlich SSNone zurück. Es gibt insgesamt 4 mögliche Einstellungen ssNone, ssBoth, usw.
Wie bekomme ich aber die Anzahl 4 heraus??? Gibt es dazu eine Funktion??

Mfg Net7

[sirius]

In etwa so:

Delphi-Quellcode:

var PropInfo:PPropInfo;
    TypeData:PTypeData;
begin

  PropInfo:=getpropinfo(memo1,'ScrollBars');
  TypeData:=getTypeData(PropInfo^.PropType^);
  
  memo1.lines.add(inttostr(TypeData^.MinValue));
  memo1.lines.add(inttostr(TypeData^.MaxValue));

[Net7]

:hello:

@sirius genau das suchte ich...

Vielen Dank!

PS:

Delphi-Quellcode:

...
case TTypeKind of
          tkInteger, tkChar, tkEnumeration, tkWChar: (
            MinValue: Longint;
            MaxValue: Longint;
...

Dabei war das immer wieder genau vor meinen Augen :wall:

Mfg Net7