rave report设置不同报表的打印机

    前几天用Fast report 进行了条形码打印。所有条形码的界面都设置好了，但是打印后的条形码不能被扫描枪识别到。由于使用的标签比较小，我也是根据标签的规格进行调整条形码的大小，进行了缩小一半，打印出来的条，空也都挺清晰的，但是就是不能识别。小徐使用了一个标签制作工具，进行条码设计，打印，没想到居然可以被识别，而且条码大小还很小，使我感觉Fast Report有漏洞啊，缩小的时候肯定少了什么东西。我也重新找报表工具制作了。

    今天也找了一天的报表工具，网上很多，可以使用QuickReport, Fast Report, Rave Report, ReportBuild等，后来就先使用了下，D7自带的报表工具Rave了，进行设计。。。也在网上找了很多的资料，在网摘上。。。

  主要有两点：

• 不同报表的打印机设计
  主要是要找到报表对象TRaveReport，它有个设置打印机名称的属性Printer：String ；
• 使用户可以进行修改报表，但是还是不能脱离Delphi使用，找了好多还是不行；需要设置DllFile := 'RaveSolo.dll'.
• 对报表中的对象进行设置属性，需要通过FindRaveComponent找到相应的对象

附学习代码

procedure TDataDealCenter.DesginBarCodeData1(sPID, sSN:  string );
var
  MyPage: TRavePage;
  MyBarCode: TRaveCode128BarCode;
  MyReport: TRaveReport;
begin
  DataModule1.rvprjct1.DLLFile : =  GetAppPath  +   ' RaveSolo.dll ' ;
  DataModule1.rvprjct1.LoadDesigner : =  True;
  DataModule1.rvprjct1.ProjectFile : =  GetAppPath  +  BARCODE_FILE1;
  DataModule1.rvprjct1.Open;
  with DataModule1.rvprjct1.ProjMan  do
  begin

    MyReport : =  FindReport( ' Report1 ' , False);
    MyReport.Printer : =  FBarCodePrinter;
    MyPage : =  FindRaveComponent( ' Report1.Page1 ' , nil)  as  TRavePage;
    MyBarCode : =  FindRaveComponent( ' BarCodeSN ' , MyPage)  as  TRaveCode128BarCode;
    MyBarCode.Text : =  sSN;
    MyBarCode : =  FindRaveComponent( ' BarCodePID ' , MyPage)  as  TRaveCode128BarCode;
    MyBarCode.Text : =  sPID;
  end;

   // DataModule1.rvprjct1.SelectReport('Report1', True);
   // DataModule1.rvprjct1.Design;
  DataModule1.rvprjct1.DesignReport( ' Report1 ' );
   // DataModule1.rvprjct1.Execute;
  DataModule1.rvprjct1.Close;
end;