打印问题请教各位！

Question

计算机本身安装了小票打印机(Pos-58)和HP DeskJet 6L惠普激光打印机及其驱动软件，两个打印机通过共享器连接微机。
应用程序的几十个窗体中由两个要用到小票打印机打印，其余窗体若有打印的均是采用激光A4幅面打印报表文档。
不知应怎样设置能一劳永逸地使得那两个窗体打印时自动使用的是小票打印机驱动打印，而其余的窗体打印时自动选择HP驱动打印呢？谢谢指教！
 

Answer 1

两个要用到小票打印机打印的程序运行：
uses
  Printers;var
  OldPrinterIndex; NewPrinterIndex: integer;begin
  OldPrinterIndex := Printer.PrinterIndex;
  NewPrinterIndex := Printer.Printers.IndexOf( 'Pos-58' );
  Printer.PrinterIndex := NewPrinterIndex;
  try
    进行你的打印工作；
  finally
    Printer.PrinterIndex := OldPrinterIndex;
  end;
end;

Answer 2

Thanks a lot to Mr.阿贵!