TfrxOleView问题(200)

我的fastreport版本是3.0，我在报表中定义了一个OLE控件，然后在delphi中通过程序去控制这个ole控件,程序如下rocedure TForm1.Button1Click(Sender: TObject);Var f1 : TfrxOLEObjcet;
begin
frxReport1.LoadFromFile('fr1.fr3');
//载入报表 fOle := tfrxoleview(frxReport1.FindObject('Ole1'));
if frxReport1.PrepareReport then
frxReport1.ShowReport;
end;
现在问题是一运行这个程序就提示：Undeclared identifier:'TfrxOLEView'不知道是为何？如何解决

我專門試了一下，沒發現此問題：首先，請確認單元文件 Uses frxoleprocedure TForm1.Button1Click(Sender: TObject);Var f1 : TfrxOLEObject;
fole: tfrxoleview;
begin
frxReport1.LoadFromFile('fr1.fr3');
//載入報表 fOle := tfrxoleview(frxReport1.FindObject('Ole1'));
fole.Left:=0;
fole.Top:=0;
if frxReport1.PrepareReport then
frxReport1.ShowReport;
end;

对不起，是我搞错了。我没有把TfrxOLEObject控件放在窗体上。现在我又有一个新的问题：我用一个表存储数据，表里只有一个字段，对应的类型是OLE对象（Access表）,这个字段有时存储的是图像，有时是文本，我想把它显示在fastreport中，我现在新建了一个.fr3文件，里面只有masterData区，然后在上面放置了一个TfrxOleView,然后运行程序procedure TForm1.frxReport1BeforePrint(Sender: TfrxReportComponent);var tempstream:TMemoryStream;
begin
try tempstream:=TMemoryStream.Create;
TBlobField(ADOTable1.FieldByName('Image')).SaveToStream(tempstream);
tempstream.Position:=0;
tfrxoleview(frxreport1.FindObject('ole1')).OleContainer. LoadFromStream(tempstream);
finally tempstream.Free;
end;
end;
当运行到tfrxoleview(frxreport1.FindObject('ole1')).OleContainer. LoadFromStream(tempstream);时提示“无效的流格式”，不知为何？

结贴。看来没人会了