type TMyButton = class(...) private FPicture : TPicture; ... published ... property Image : TPicture read FPicture; end;