我现在正在做一个程序,设计了一个报表,报表上有一个计算字段,对当前页上的金额进行求和,这个值还需要转变成大写金额,所以我想把它读进程序里来,转换过后再更新到报表中去,请问该如何写?

解决方案 »

  1.   

    在你的单元中写一个函数,在rave中调用你的函数.
      

  2.   

    可是怎么写,怎么在rave中调用呢,是否给个例子!
      

  3.   

    //这个和向报表中赋值是差不多的,下面是把报表中TEXT1的值放到EDIT中
    var
        MyPage: TRavePage;
        MyText: TRaveText;
    begin
      RaveProject1.Open;
      With RaveProject1.ProjMan do begin
          MyPage := FindRaveComponent('Report1.Page1',nil) as TRavePage;
          MyText := FindRaveComponent('Text1',MyPage) as TRaveText;
      end; { with }
      RaveProject1.Execute;//Report('Report1');
      Edit1.Text :=MyText.Text;
      RaveProject1.Close;
      

  4.   

    如果是计算字段呢?比如CalcText,获取的值是竟然是表达式:Sum(Price)!!!郁闷