怎样写一个ActiveX控件，使它在Word中插入以后再读出来，图像不会丢失？ (100分)

怎样写一个ActiveX控件，使它在Word中插入以后再读出来，图像不会丢失？
ActiveX控件是通过Word的菜单插入的，插入时，会给图片赋初值。
控件的Paint是这样写的：
procedure TPvtWordSign.Paint;
begin
inherited;
if Assigned(FSignPic.Graphic) then
Canvas.StretchDraw(ClientRect, FSignPic.Graphic);
end;
第一次创建时，由于有FSignPic.Graphic，所以没有问题
但是存档再读出来，乍一看也没有问题（因为Word会自动保存ActiveX的图片），
但是当拉动控件大小时，触发了Paint事件，
由于没有给FSignPic.Graphic赋值，图片就显示不出来了。
请教如何解决？（读取文档时，是不知道创建时的图片的）

搞定：在TPvtWordSign中声明TPicture属性（将FSignPic引出来），Delphi会转成IPicture接口，
并且会自动保存。

能不能收回积分阿？