fastreport的两个小问题?

Question

1. DialogPage1.Edit1.Text的值如何传给Page1中的Memo1?
2. frReport1.Dictionary.Variables['New Variable'] := 'CustomerData.Customers."CustNo"'; 会提示Dictionary没定义?

Answer 1

var
  v : TFRView;
begin
  v := FRReport1.FindObject('Memo1');
  if Assigned(v) then v.Memo.Text := DialogPage1.Edit1.Text
edn;

Answer 2

var
  v : TFRView;
begin
  v := FRReport1.Pages[0].FindObject('Memo1');
  if Assigned(v) then v.Memo.Text := DialogPage1.Edit1.Text
edn;

Answer 3

FRReport1.FindObject('Memo1')返回的是frxcomponent呀，不行的

Answer 4

我测过是没问题的!
这样看看!
v := (FRReport1.FindObject('Memo1') as TFRView)

Answer 5

用参数传进去,fastreport支持传外参的.