Código Delphi [-] var V: TfrView; begin guzial_ini := TINIFile.Create('../plik2.ini'); frReport4.LoadFromFile('test4.frf'); V :=(frReport1.FindObject('Picture1'); tfrpictureview(V).Picture.LoadFromFile('c:\a.jpg'); frReport4.PrepareReport;// don't need if calling showreport or if you call prepare then use showpreparedreport instead of ShowReport; end;
var V: TfrView; begin guzial_ini := TINIFile.Create('../plik2.ini'); frReport4.LoadFromFile('test4.frf'); V :=(frReport1.FindObject('Picture1'); tfrpictureview(V).Picture.LoadFromFile('c:\a.jpg'); frReport4.PrepareReport;// don't need if calling showreport or if you call prepare then use showpreparedreport instead of ShowReport; end;