请高手指教-------dephi7+fastreport怎样把参数传递个fastreport

Question

想做个报表，在form上把时间传递给fastreport不知如何做？请大家帮忙!!

Answer 1

在frReport1中的onGetvalue事件中写上
如：
[RQ1]是fastreport变量；
frVariables->Variable["RQ1"]=DateToStr(DateTime1->Date);

Answer 2

在frReport1中的onGetvalue事件中写上
if AnsiCompareText(ParName, 'FrmTime') = 0 then
      ParValue := formatdatetime('yyyy-dd-hh', now)

Answer 3

var
t: TfrMemoView;
begin
t := TfrMemoView(frReport1.FindObject(‘Memo1‘));
if t <> nil then
t.Memo.Text := ‘FastReport‘;
end;

Answer 4

先在frReport1中的memo中设上变量如“[x1]”
在frReport1中的onGetvalue事件中写上
   if parName='x1' then
      ParValue:=dateToStr(Date);
也可以加入其它的一些自定义的变量等

Answer 5

还有点问题想请教一下：就是dephi的treeview控件。我怎么才能获得节点的text？是多级目录，请帮忙！