请问：如何用TRMReport控件打印TImage控件中的图片？TRMReport控件如何和TImage控件相关联呢？

Question

如题.

Answer 1

procedure TForm1.PrintClick(Sender: TObject); 
var 
 PImg: string; 
begin 
 RMGridReport1.LoadFromFile('D:\Reports\PC001');  PImg := 'D:\Image\OC001.jpg'; 
 //SetJPG96Pixel(PImg, 0.406);  try 
   with RMGridReport1.Dictionary do 
   begin 
     Variables.Insert(VARIABLES.Count, 'PImg'); 
     Variables.AsString['PImg'] := PImg; 
   end; 
   RMGridReport1.ShowReport; 
 finally 
 end; 
end; 

Answer 2

你这个方法好像不行，因为加上RMGridReport1.PrintReport后，不能在打印队列中出现打印文档呀,也就是不能把打印任务送给打印机。