Anzahl der Ord in Propertys herausfinden

[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));