解决方案 »

  1.   

    http://download.csdn.net/detail/lsh341999/8068039
      

  2.   

    二维码不就是一张图片嘛,只要能打印图片就行了,不用控件也可以。
     sl := TStringList.Create;  Printer := TPrinter.Create;
      try
        StartPrint(0, 0, Printer);
      except
      end;
      sl := TStringList(Printer.Printers);
      Printer.BeginDoc;
      temhi := img.Height;
      temwd := img.width;
      with strect do
      begin
        left := 10;
        top := 10;
        right := left + temwd;
        bottom := top + temhi;
      end;
      Printer.Canvas.StretchDraw(strect,img.picture.graphic);
      printer.EndDoc;
      printer.Free;
      

  3.   

    谢谢!这个是可以,但是也不仅仅是打印二维码,是要放到FastReport中,方便打印一些企业用的报表等。