Tblobfield & Tblobstream

[(امید)]

کدام یک از 2 روش زیر مناسب تر است:
تفاوت کار با Tblobfield و Tblobstream چیست؟


var myblobfield:tblobfield;
begin
if savedialog1.Execute then
begin
ado_word.Open;
myblobfield:=ado_wordmyblob;
myblobfield.SaveToFile(savedialog1.FileName);
end;
end;




var
blob: TBlobStream;
begin
ado_pic.open;
blob := TBlobStream(ado_pic.CreateBlobStream(ado_pic.Field ByName('myblob'), bmRead));
try
blob.Seek(0, soFromBeginning);
savedialog1.Execute ;
with TFileStream.Create(savedialog1.FileName , fmCreate) do
try
CopyFrom(blob, blob.Size);

finally
Free
end;
finally
blob.Free;

با تشکر

[amirrf]

سلام،

TBlobField از TField ساخته شده در حالی که TBlobStream از TStream و هر یک امکانات و کارکردهای خود را دارد.
برای SaveToFile روش اول ساده تر است و روش دوم مزیتی ندارد. اگر می خواستید داده را تکه تکه بخوانید به TBlobStream نیاز پیدا می کردید.