如何获得fastreport备忘录值

时间:2019-06-10 03:14:47

标签: delphi delphi-xe2 fastreport

我很难将备忘录的价值从fastreport传递到delphi。我在fastreport中有一个带有计算值的备忘录,我想获取此值并将其发送给我的delphi编辑文本。

我尝试了这段代码,但结果只是文本而不是值

txtValue.text := TfrxMemoView(frxReport1.FindComponent('Memo3')).Text;

1 个答案:

答案 0 :(得分:1)

您可以照做

begin
    // Get Text property 
    txtValue.text := TfrxMemoView(frxReport1.FindComponent('Memo3')).Text;
    // Get Value property
    txtValue.text := TfrxMemoView(frxReport1.FindComponent('Memo3')).Value;
end;

如果要从TextValue属性连接两个字符串,则

procedure TForm1.Button1Click(Sender: TObject);
begin
    // Set the Text property
    TfrxMemoView(frxReport1.FindObject('Memo3')).Text:= 'MyFirstString';
    // Set the Value property
    TfrxMemoView(frxReport1.FindObject('Memo3')).Value:= 'MySecondString';
    // Concatenate the strings and assign the result to the TEdit.Text property
    txtValue.Text:= Concat(TfrxMemoView(frxReport1.FindObject('Memo3')).Text,
                           ' ',
                           TfrxMemoView(frxReport1.FindObject('Memo3')).Value
                          );
end;