Rave 参数传递？

Question

怎么把Delphi中的变量传到Rave?
例如 Form1.Text1.Text 传到 Rave中的Text1.Text
谢谢了

Answer 1

感觉DELPHI版冷清了,我来给帮楼主...你自己调试一下...
uses 
RVClass, RVProj, RVCsStdprocedure TForm1.Button1Click(Sender: TObject);
var
    MyPage:TRavePage;
    MyText:TRaveText;
begin
    With RvProject1.ProjMan do
    begin
      MyPage := FindRaveComponent('Report1.Page1',nil) as TRavePage; //查找ＰＡＧＥ
      MyText := FindRaveComponent('Text1',MyPage) as TRaveText; //查找ＴＥＸＴ
      MyText.Text := 'Boland Delphi'; //设置报表中文本内容
      MyText.Color := clGreen;  //设置颜色
    end; { with }
    RvProject1.ExecuteReport('Report1');
    RvProject1.Close;end;

Answer 2

报错呀，
Project projecdt1.exe raised exception class eaccessviolation with message ’Access violation at address oo4DBA9B in module’ project1.exe’. Read of address 00000000’. Process stopped. Use step or Run to continue.模块错?地址报错 ?

Answer 3

要在前面加这个:
RvProject1.Open;在    With RvProject1.ProjMan do前面加procedure TForm1.Button1Click(Sender: TObject);
var
    MyPage:TRavePage;
    MyText:TRaveText;
begin
   RvProject1.Open;
    With RvProject1.ProjMan do
    begin
      MyPage := FindRaveComponent('Report1.Page1',nil) as TRavePage; //查找ＰＡＧＥ
      MyText := FindRaveComponent('Text1',MyPage) as TRaveText; //查找ＴＥＸＴ
      MyText.Text := 'Boland Delphi'; //设置报表中文本内容
      MyText.Color := clGreen;  //设置颜色
    end; { with }
    RvProject1.ExecuteReport('Report1');
    RvProject1.Close;end;