谁用过Metadraw组件，在delphi下画出的矢量图怎样存入数据库？急！！！100分啊(100分)

代码如下：用的是Access的数据库，字段类型为Ole的
var
a:OleVariant;
begin
a:=adodataset1.fieldbyname('pic').AsVariant;
adodataset1.Edit;
MetaDraw1.SavePicture(a,PIC_PICTURE,PICTYPE_METAFILE);
adodataset1.Post;
end;