delphi如何编写打印程序

我需要编写一个delphi做的打印程序，用来打印过磅后的磅单，从数据库中查询出来具体数据，在一张磅单纸上打印出来，生成打印编号，同时还要把打印的信息再写入数据库中相应的数据当中。有没有人可以指导一下呢。