Ну так и в примере картинка берется из запроса. В чем проблема?
Набросал пример, у меня работает. только использовал вместо запроса opendialog:
Код:
var
MyBitmap1: TRaveBitmap;
MyPage: TRavePage;
MS:TMemoryStream;
JPG:TJPEGImage;
BMP:TBitMap;
begin
OpenPictureDialog1.Execute;
MS := TMemoryStream.Create;
JPG := TJPEGImage.Create;
BMP := TBitmap.Create;
ms.LoadFromFile(OpenPictureDialog1.FileName);
MS.Position := 0;
JPG.LoadFromStream(MS);
BMP.Assign(JPG);
RvProject1.open;
With RvProject1.ProjMan do
begin
MyPage := FindRaveComponent('Report1.Page1',nil) as TRavePage;
MyBitmap1:=FindRaveComponent('BitMap1',MyPage) as TRaveBitmap;
MyBitmap1.Image.Assign(BMP);
MS.Free;
JPG.Free;
BMP.Free;
end;
RvProject1.SelectReport('Report1',True);
RvProject1.Execute;
RvProject1.close;