如何用Tprinter设计BCB操作数据库程序中的报表

    经常用Borland C++ Builder5编程，操作数据库时，报表打印是必不可少的。但BCB5自身所带的报表控件又显得缺少灵活性。所以，我想到了用TPrinter来打印报表。使用TPrinter必须要在程序头部加入#include <vcl/Printers.hpp>
    由于对于不是链页打印纸来说，断页很困难，所以，我所需要设定每页打印的记录数。下面就是我自己编制的一个每页打印30条符合条件记录的代码，写给大家，以供参考。
try{
//定位打印头
  int x,y;
  x=170;
  y=150;
  Printer()->BeginDoc();//开始一个打印工作
//打印标头
  Printer()->Canvas->Font->Size=24;
  Printer()->Canvas->Font->Name="黑体";
  Printer()->Canvas->TextOut(x,y," -----服装请领记录-----");
  Printer()->Canvas->Font->Size=10;
  Printer()->Canvas->Font->Name="宋体";
  x=190;
  y=y+300;
//打印表格标题行
  Printer()->Canvas->TextOut(x,y," ◇"+Trim(Label12->Caption));
  y=y+80;
  Printer()->Canvas->TextOut(x