在frreport1的ongetvalue事件中我用下面的语句赋值.(Memo6在页头或主页头上都没有赋值成功.)
但将memo6移到页脚或主项数据上赋值又成功这是为什么?
frReport1.FindObject('Memo6').Memo.Strings[0]:=edt2.Text;

解决方案 »

  1.   

    TfrxMemoView(frxReport1.FindObject('Memo6')).Text:=edit2.Text;
      

  2.   

    Q: 我怎样将数据传送到报表?A: 有几个方法可以实现它. 第一是使用全局对象 frVariables (在 FR_Class 单元中被定义):frVariables[‘My variable‘] := 10;这段代码创建了一个名称为“My variable”,值为 10 的变量。这是最好的传输固定数据的报表的方法。第二种方法是使用 TfrReport.OnGetValue 事件. 这可以使用这个方法来传送动态数据、记录等。procedure TForm1.frReport1GetValue(ParName: String; var ParValue: Variant);
    begin
    if ParName = ‘MyField‘ then
    ParValue := Table1MyField.Value;
    end;最后, 第三种方法是通过编程在数据词典中定义变量(可以参考以前的问题):with frReport1.Dictionary do
    begin
    Variables[‘MyVariable‘] := ‘CustomerData.Customers."CustNo"‘;
    Variables[‘Another Variable‘] := ‘10‘;
    end;