关于rave打印的问题(5分)

请问怎么把界面上面的数据，比如对话框中的数据直接传到rave中？然后实现打印？

例子：
procedure TForm.Button1Click(Sender: TObject);
VAR MyPage:TRavePage;
text1,text2 : TRaveText;
//rave报表中的text有多少定义多少
begin
RvProject1.Open;
with RvProject1.ProjMando
begin
MyPage:=FindRaveComponent(report.Page1',nil) as TRavePage;
text1:=FindRaveComponent('text1',MyPage) as TRaveText;
text2 :=FindRaveComponent('text2 ',MyPage) as TRaveText;
text1.Text:=edit1.text;
text2.Text:=edit2.text;//赋值，从form到rave
end;
try
RvProject1.ExecuteReport('report');
finally
RvProject1.Close;
end;
end;