stream 怎么存入SQL数据库 ( 积分: 100 )

stream 怎么存入SQL数据库？
比如
OpenDialog1.Filter := 'Image files|*.jpg;*.bmp;';
strm := Tmemorystream.Create;
if OpenDialog1.Execute then begin
Image1.Picture.LoadFromFile(OpenDialog1.FileName);
strm.LoadFromFile(OpenDialog1.FileName);
strm.Position := 0;
end;

with adoquery1 do begin
close;
sql.clear;
sql.add('insert into table(ss,image) values('''+a+''',?)');
execsql
end;

请问在问号处应该用什么格式？急，在线等待！

stream 怎么存入SQL数据库？
比如
OpenDialog1.Filter := 'Image files|*.jpg;*.bmp;';
strm := Tmemorystream.Create;
if OpenDialog1.Execute then begin
Image1.Picture.LoadFromFile(OpenDialog1.FileName);
strm.LoadFromFile(OpenDialog1.FileName);
strm.Position := 0;
end;

with adoquery1 do begin
close;
sql.clear;
sql.add('insert into table(ss,image) values('''+a+''',?)');
execsql
end;

请问在问号处应该用什么格式？急，在线等待！