procedure TForm1.frxReport1BeforePrint(Sender: TfrxReportComponent); var picpath:string; begin picpath:=......; if (sender is TFrxPictureView) and (sender.Name='Picture1') then with (sender as TFrxPictureView) do if FileExists(picpath) then Picture.LoadFromFile(picpath);end;
procedure TForm1.frxReport1BeforePrint(Sender: TfrxReportComponent);
var
picpath:string;
begin
picpath:=......;
if (sender is TFrxPictureView) and (sender.Name='Picture1') then
with (sender as TFrxPictureView) do
if FileExists(picpath) then
Picture.LoadFromFile(picpath);end;