用ODAC读取Oracle中的图片，为何只能读取64k已内的，超过64k的图片就只能显示一部分了？？？？

[loader]

var
pic: TMemoryStream;
pjpg: tjpegimage;
wl: string;
begin
Img.Visible := true;
Img.Update;
pjpg := TJpegImage.Create;
pic := TMemoryStream.Create;
TBlobField(DM.OQ1.FieldByName('content')).SaveToFile('c:\123.jpg');
if pic.Size <= 0 then
begin
Img.Visible := false;
Img.Update;
exit;
end;
pjpg.LoadFromFile('c:\123.jpg');
Img.Picture.Assign(pjpg);
Img.Update;

[loader]

up

[John1202]

up

[widow]

我没有遇到过，但凭经验，找找OSSION控件的相关的属性应该可以解决，我用BDE时遇到过这样的问题。

[xiaoyanggonghui]

var
str:string;
begin
with adoquery1 do
begin
close;
sql.Clear;
sql.Add('delete from ip');
execsql;
end;
str:='insert into IP(IP) values(:xiao)';
with adoquery1 do
begin
close;
sql.Clear;
sql.Add(str);
Parameters.parambyname('xiao').Assign(Image1.picture.bitmap);
execsql;
end;
/////////////////////////////////////
自己看着办 我没时间