[Lazarus] How to create a TPicture type property?

Gabor Boros gaborboros at yahoo.com
Thu Jul 14 18:58:37 CEST 2016


Hi All,

I have a component like this:

TMyComponent=class(TPersistent)
private
   FPicture:TPicture;
public
   constructor Create;
published
   property Picture:TPicture read FPicture write FPicture;
end;

constructor TMyComponent.Create;
begin
   inherited;

   FPicture:=TPicture.Create;
end;

When click on the Picture property in OI the "Load Image Dialog" showed 
then click on Load button and got SIGSEGV. Where is the source of the 
problem?

Gabor


More information about the Lazarus mailing list