Canvas als Komponenten-Eigenschaft

[bitsetter]

Hi,

bist du dir sicher, dass du die published-Eigenschaften meinst?
Die Eigenschaft Canvas ist bei der TPaintbox nämlich unter public deklariert.

Bei published-Eigenschaften müsste es aber so gehen:

Delphi-Quellcode:

uses
  TypInfo;

...
var
  Info: PTypeInfo;
const
  PropName= 'Color';
begin
  Info := TypeInfo(TPaintbox);
  Showmessage(Format('Color ist published: %s', [BoolToStr(Assigned(GetPropInfo(Info, PropName)), True)]));