uses RVClass, RVProj, RVCsStd;
procedure TForm1.Button1click1;
var
MyPage: TRavePage;
MyText1: TRaveText;
begin
RvProject1.open;
With RvProject1.ProjMan do
begin
MyPage := FindRaveComponent('Ficha1.Page1',nil) as TRavePage;
MyText1 := FindRaveComponent('Text1',MyPage) as TRaveText;
MyText1.Text := 'Prueba1';
end;
RvProject1.SelectReport('Ficha1',true);
RvProject1.Execute;
RvProject1.close;
end;