1:    rave  下的event editor 如何獲取當前頁數?不知在rave下能否通過控制頁數對text,datatext,line等進行控制?
2:   rave打印Tchart解決方案   希望大家暢所欲言,對rave做下全面的交流,達到網絡資源共享.來者有分!周一接帖,前10名各5分,後10名各5分,
問題解決者,另開帖100分!

解决方案 »

  1.   

    Report Variables中有CurrentPage当前页,TotalPages总页数,DateShort短日期,DateLong长日期,
      

  2.   


       樓主我問過的rave問題,真的是沒有一個那麼另我滿意的,我奇了怪了,
    難道rave用的人真的那麼少嘛?如果真的解決不了,我只能改fastreport
    了。感謝大家參與,不過起碼人數要多余20吧,我在接帖!
      

  3.   


        yzty(雨中太阳) 怎麼在 rave editor 調用呢?
      

  4.   

    你可以在VCL或CLX应用程序中使用Rave Reports去实现来自数据库或非数据库数据的报表.下面的过程说明
    怎样增加一个简单的报表到已存在的数据库应用程序中.   1.在Delphi中打开一个数据库应用程序.
       2.从组件面板的Rave页,假如TRvDataSetConnection组件到应用程序的表单.
       3.在Object Inspector中,设置DataSet的属性为一个已在你的应用程序中定义的dataset组件.使用Rave Visual Designer
       4.去设计你的报表然后并创建一个report project文件(.rav file). 
          选择Tools|Rave Designer运行Rave Visual Designer.
          选择File|New Data Object显示Data Connections对话框.         
          在Data Object Type列表,选择Direct Data View然后单击Next.
          在Active Data Connections列表,选择RVDataSetConnection1然后单击Finish.
          在Rave Visual Designer窗口左边的Project Tree中,展开Data View Dictionary结点,燃后展开刚创建的DataView1结点.
          你要使用的数据字段显示在DataView1结点下. 
          选择Tools|Report Wizards|Simple Table显示Simple Table wizard.
          选择DataView1然后单击Next. 
          选择你想要在这个报表中显示的两个或三个字段然后单击Next.
          按照随后的向导页提示区设置要在这个报表中使用的字段的排序, 页边距,首部文本,以及字体. 
          在最后向导页上,单击Generate完成这个向导然后在页面设计器中显示报表.
          选择File|Save as显示Save As对话框. 把Rave project存到你的Delphi应用程序的目录下并命名为MyRave.rav. 
          最小化Rave Visual Designer窗口返回Delphi.   5.从组件面板的Rave页,添加一个项目组件TRvProject到表单. 
       6.在Object Inspector,设置ProjectFile属性为刚才创建的report project文件(MyRave.rav). 
       7.从组件面板的Standard页,添加TButton到表单.
       8.在Object Inspector,单击Events标签然后双击OnClick事件.
       9.在事件处理程序中使用ExecuteReport方法去执行Rave project组件. 
       10.按F9运行应用程序.
       11.单击在第七步添加的按钮.
       12.Output Options对话框被显示出来,单击OK显示报表.
      

  5.   

    1、打开RAVE,在完成主体设计后,在DATAVIEW1REGION1下方添加一个REGION组件
    (修改其尺寸为合适高度),并在其中放一DATATEXT组件,然后选中刚加入的
    DATATEXT,修改其DATAFIELD属性,如可更改为"第" + Report.CurrentPage +  "
    页",即可显示“第1页”...
    4、修改DELPHI安装目录下之RAVE\LIB目录下RpFormSetup.dfm、
    RpFormPreview.dfm二文件中有关英文为对应中文即可。
      

  6.   

    一直不这个弄报表。偶用Excel。帮你找了一个文档。英文的你对照着看看吧:http://www.delphibox.com/article.asp?articleid=906
      

  7.   

    获取页数比较好做,打印tchart,好象不好解决的。网上的rave开发指南有介绍teechart的,可是我用过不行。对于teechart,我的解决方法是:  在rave可视化设计器中,放入Metafile控件。将chart存成临时的图片文件;page02:= FindRaveComponent('Report1.page1',nil) as TravePage;
    Metafile02:= FindRaveComponent('MetaFile1',page02) as TRaveMetaFile;
    DBChart3.saveToMetafile(g_AppPath+ '\data\rave\tmpmetafile.emf');//将teechart存贮为meta文件
    Metafile02.FileLink :=g_AppPath+ '\data\rave\tmpmetafile.emf';
    RvProject1.ExecuteReport ('Report1') ;
      

  8.   

    ksaiy(消失在人海) 不行的,我是想在rave editor 獲取page 在某個page下實現事件,譬如說,
    我想在最後一頁時,出現某個數據,幫忙解決,問題已經提出很長時間了,可無人能很好幫我解決,再次謝謝大家!
      

  9.   

    :动态的设置报表中的内容
       uses
        RVClass, RVProj, RVCsStd;
      var
        MyPage: TRavePage;
        MyText: TRaveText;
      begin
        RaveProject1.Open;
        With RaveProject1.ProjMan do begin
          MyPage := FindRaveComponent('Report1.Page1',nil) as TRavePage; //查找PAGE
          MyText := FindRaveComponent('Text1',MyPage) as TRaveText; //查找TEXT
          MyText.Text := 'Boland Delphi'; //设置报表中文本内容
          MyText.Color := clGreen; //设置颜色
        end; { with }
        RaveProject1.ExecuteReport('Report1');
        RaveProject1.Close;
      end;
     同样可以在delphi中设置 line,但对于datatext可控制外观,希望高手指教如何设置数据源和字段??????
     2.设计时通过程序动态向报表增加一个TEXT
            uses
            RVClass, RVProj, RVCsStd,RvCsRpt;
            
    var
      MyBand: TRaveBand;
      MyRegion: TRaveRegion;
      MyPage: TRavePage;
      MyText,mytext1: TRaveText;
    begin
      RvProject1.Open;
      With RvProject1.ProjMan do begin
          MyPage := FindRaveComponent('Report1.Page1',nil) as TRavePage;
          MyRegion:= FindRaveComponent('Region1',MyPage) as TRaveRegion;
          MyBand := FindRaveComponent('Band1',MyRegion) as TRaveBand;
          MyText:=TRaveText.Create(Myband);
          MyText.Parent:=Mypage;
          MyText.Name:=GetUniqueName('Text125',MyPage,false);
          MyText.Top:=0.2;
          MyText.Left:=0.7;
          MyText.Width:=200;
          MyText.Height:=200;
          MyText.Text:='Delphi';       
          MyText.Font.Size :=20;//设置字体的属性
          MyText.Font.Color :=ClRed;
          MyText.Font.Name :='隶书';
          AddComponent(MyText);

      end; { with }
      RvProject1.ExecuteReport('Report1');
      RvProject1.Close; 
      
     问题6:在报表中插入日期或页数
          在RAVE设计时增加一个DATATEXT控件,其DATAFIELD属性有相关的设置
          Report Variables中有CurrentPage当前页,TotalPages总页数,DateShort短日期,DateLong长日期,
          TimeLong 长时间
      

  10.   

    njcw666(黄土地) 老兄這個我也知道,我想了解怎麼在 rave中的 Event Editor 中抓取page
    我要實現--->在末頁通過判斷,self.value:=false;
    大家慷慨幫助,此帖子我已經帖了2周了,一直沒有滿意的答案,問題解決立刻結帖!
      

  11.   

    获取页数比较好做,打印tchart,好象不好解决的。网上的rave开发指南有介绍teechart的,可是我用过不行。对于teechart,我的解决方法是:  在rave可视化设计器中,放入Metafile控件。将chart存成临时的图片文件;
         lk