fastReport动态传参【含图片】

  在作fastreport设计时，时常会动态传参界面的数据。设计步骤如下：

1、在fr3文件中录入变量，Report-->Variables-->定义变量。如下图：

 2、在frxReport的事件：OnGetValue中动态传参

procedure TFmRecord.frxReport1GetValue(const VarName: string;
  var Value: Variant);
var
  ftpic:TfrxPictureView;
begin
  if VarName='PEONAME' then Value:=edtName.text;
  if VarName='PEOSEX' then Value:=edtSex.text;
  if VarName='IN_TIME' then Value:=FormatDateTime('c',now);
  ftpic:=frxReport1.FindObject('picture2') as  TfrxPictureView;
  ftpic.Picture.Assign(image1.Picture) ;
end;