楼上的方法可以,我用程序写一个给你
uses
RvClass,RvCsStd,RvCsRpt;//首先要加载这几个单元
var
page1:TRavePage;
region1:TRaveRegion;
band1:TRaveBand;
text1:TRaveText;
begin
Rvproject.open;
with Rvproject1.promando
//放一个TRvproject到窗体
begin
page1:=findravecomponent('Report1',nil) as TRavePage;//Report1是报表的名
region1:=findravecomponent('Region1',page) as TRaveRegion;
band1:=findravecomponent('Band1',region) as TRaveBand;
text1:=findravecomponent('Text1',band) as TRaveText;
text1.text:=edit1.text;
end;
Rvproject1.executereport('Report1');
//执行
Rvproject1.close;
end;