在delphi7中，用rave做报表我怎样通过程序给报表中的text组件赋值

Question

在delphi7中，用rave做报表我怎样通过程序给报表中的text组件赋值

Answer 1

usesRVClass, RVProj, RVCsStd; varMyPage: TRavePage;MyText: TRaveText; beginRvProject1.Open;
rvproject1.projectfile:='rave所在路徑';
With RvProject1.ProjMan do beginMyPage := FindRaveComponent('Report1.Page1',nil) as TRavePage; 
MyText := FindRaveComponent('Text1,MyPage') as TRaveText;　MyText.Text :=' Boland Delphi'; 
end; { with }RaveProject1.Execute;RaveProject1.Close;end;

Answer 2

usesRVClass, RVProj, RVCsStd; procedure TForm1.Button1Click(Sender: TObject);
var
page:Travepage;
text:Travetext;
begin
     rvproject1.ProjectFile:='/*.rav';
     RvProject1.Open;     With RvProject1.ProjMan do
     begin
            Page := FindRaveComponent('Report1.mainpage',nil) as TRavePage;\\抓頁            Text:=FindRaveComponent('modi(自定義名稱)',MyPage) as TRaveText;\\抓文本
            Text.Text:= 'Boland Delphi';
            RvProject1.Execute;     end;
 end;

Answer 3

将Text  改为DataText, 并给它加入一个参数名，如
Param.param1,运行时：
  RvProject1.SetParam('param1','001008'); 
  RvProject1.Execute;