LoadFromStream() : Invalide Filename

swierzbicki

Hello,

I'm trying to use the LoadFromStream Method. I can't get it works !

Here is the sample of my code :

procedure TForm1.Button1Click(Sender: TObject);
var template : TStream;
begin
template:= ZReadOnlyQuery1.CreateBlobStream(ZReadOnlyQuery1.FieldByName('Report'), bmRead);
try
frxreport1.LoadFromStream(template);
frxreport1.DesignReport;
finally
template.free;
end;
end;

I'm getting an exception with : frxreport1.LoadFromStream(template);
It tells me that the file format is no good !!!!

Am i doing something wrong ?

Thank you

aldocaetano

Try this:
...
template:= ZReadOnlyQuery1.CreateBlobStream(ZReadOnlyQuery1.FieldByName('Report'), bmRead);
Template.Postion := 0;
try
frxreport1.LoadFromStream(template);
...

swierzbicki

Thank you for the answer, but i found my problem : the blob field size was too small. The fr3 file was truncated....

Thank you anyways