var
memo1:TRmmemoview;
begin
try
Report1.LoadFromFile(extractFilePath(application.ExeName)+'/rep/stasticrep.rmf');
memo1:=Trmmemoview.Create;
memo1.Memo.Text:=sProName00;//比如你选的9月
report1.FindObject('memo4').Memo.Text:=memo1.Memo.Text;// 你的report上放置显示月份的text