怎样把OLE调用的图形存储到SQL中的BLOB字段中？(50分)

如题。谢谢！在线等待给分！

看看这样行不行？
如果是SQL SERVER 定义字段为IMAGE,如果是Access字义字段为OLE对象。
procedure TForm1.Button1Click(Sender: TObject);
var
aBlob : TADOBlobStream;
begin
if OpenPictureDialog1.Execute then
begin
With ADOQuery1 do
begin
if not Active then Open;
Append;
aBlob := TADOBlobStream.Create(TBlobField(FieldByName('Pic')), bmWrite);
Try
aBlob.LoadFromFile(OpenPictureDialog1.FileName);
Finally
aBlob.Free;
end;
Post;
end;
end;
end;

接受答案了.