Create table Testtable1
(id int primary key,
blobValue long);Create table Testtable2
(id int primary key,
blobValue Blob);procedure TForm1.BitBtn4Click(Sender: TObject);
begin
try
Table1.Active := true;
Table1.insert;
Table1.FieldValues['id'] := getId;
TBlobField(Table1.fields.FieldByName('blobvalue')).LoadFromFile (FileName);
Table1.Post;
Table1.Close;
except
on e : exception do
begin
raise exception.Create(e.message);
end;
end;如果使用第一个表也就是用long型,则不会出问题,否则用TestTable2,也就是Blob型会报错,错误信息如下:LOB定位器无法扩展事务处理,
请问谁能解释一下,该怎么用Blobend;
(id int primary key,
blobValue long);Create table Testtable2
(id int primary key,
blobValue Blob);procedure TForm1.BitBtn4Click(Sender: TObject);
begin
try
Table1.Active := true;
Table1.insert;
Table1.FieldValues['id'] := getId;
TBlobField(Table1.fields.FieldByName('blobvalue')).LoadFromFile (FileName);
Table1.Post;
Table1.Close;
except
on e : exception do
begin
raise exception.Create(e.message);
end;
end;如果使用第一个表也就是用long型,则不会出问题,否则用TestTable2,也就是Blob型会报错,错误信息如下:LOB定位器无法扩展事务处理,
请问谁能解释一下,该怎么用Blobend;
http://www.csdn.net/expert/topic/960/960982.xml?temp=.7765467
看delphi BDE 帮助。
Create table Testtable1
(id int primary key,
blobValue BLOB(1,5));
我爱Delphi!