Komponenteninfos zur Laufzeit anzeigen?

[shmia]

Delphi-Quellcode:

uses ...,TypInfo;
...
var
  c : TComponent;
begin
  c := {irgendwas};
  if IsPublishedProp(c, 'Caption') then
    ShowMessage('Property Capion ='+GetStrProp(c, 'Caption'));