读入数据:
var
ms:variant;
begin
table1.append;
tblobfield(table1.fieldbyname('image')).loadfromstream(ms);
table1.post;
end;
读出数据:
例如图片:
var
ms:variant;
begin
ms:=createblobstream(table1.fieldbyname('image'),bmread);
image1.picture.bitmap.loadfromstream(ms);
ms.free;
end;
var
ms:variant;
begin
table1.append;
tblobfield(table1.fieldbyname('image')).loadfromstream(ms);
table1.post;
end;
读出数据:
例如图片:
var
ms:variant;
begin
ms:=createblobstream(table1.fieldbyname('image'),bmread);
image1.picture.bitmap.loadfromstream(ms);
ms.free;
end;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货