请教 用ClientDataSet存取Bolb字段!!
bcghb 2003-08-20 02:54:00 var
Stream:TMemoryStream;
Stream1:TStream;
begin
with form1.ClientDataSet1 do
begin
Edit;
Stream:=TMemoryStream.Create;
Stream.Position:=0;
form1.Memo1.Lines.SaveToStream(Stream);
Stream1:=CreateBlobStream(FieldByName('BlobField'),bmReadWrite);
try
Stream1.CopyFrom(Stream,Stream.Size);//这里出错"Stream Read Error"
Post;
finally
Stream1.Free;
end;
Stream.Free;
end;
为什么呢?