RTTI auch zur Designzeit?

[snook]

ich häng mal die units ran, ist vielleicht auch für andere ganz interessant, bin ich dank dem forum drauf gestoßen, nach einiger sucharbeit

das ganze lässt sich dann zum beispiel so anwenden:

Delphi-Quellcode:

{$METHODINFO ON}
uses HVMethodSignature, HVMethodInfoClasses;

type
  TestKlasse = class(TComponent)
  private
    procedure ShowMethods;
  public    
    function LiesReal: real;
    SchreibReal(value: Real);
  end;

  var Test: TestKlasse;

implementation
  
procedure TestKlasse.ShowMethods;
var Info: TClassInfo;
    i   : integer;
begin
  GetClassInfo(Klasse.ClassInfo,Info);
  for i := Low(Info.Methods) to High(Info.Methods) do
    ShowMessage(MethodSignatureToString(Info.Methods[i]));
end;