G gongfs Unregistered / Unconfirmed GUEST, unregistred user! 2006-12-02 #1 一台电脑上安装不同的打印机,请问如何将内容打到不同的打印机上 谢谢! 奉上88 分 祝发财!!!
D delhpi Unregistered / Unconfirmed GUEST, unregistred user! 2006-12-02 #4 建立一个combobox，它的items=printer.printers 将选择的打印机名 保存 打印时，根据名称，用i:= printer.printers.items.indexof(名称) 得到该名称对应的序号. 再 printer.printerindex:＝i 就行了。
建立一个combobox，它的items=printer.printers 将选择的打印机名 保存 打印时，根据名称，用i:= printer.printers.items.indexof(名称) 得到该名称对应的序号. 再 printer.printerindex:＝i 就行了。
G gongfs Unregistered / Unconfirmed GUEST, unregistred user! 2006-12-02 #5 delphi: 首先感谢您的帮助 还有一个问题问一下 printer.printerindex:＝i 怎么编译不过关 谢谢
A ANiDelphi Unregistered / Unconfirmed GUEST, unregistred user! 2006-12-02 #6 用TPrintDialog可以在打印前选择打印机
D delhpi Unregistered / Unconfirmed GUEST, unregistred user! 2006-12-02 #7 function GetPrnNameToIndex(PrnName: widestring): Integer; //根据打印机 名称 转换成 序号 begin result := printer.Printers.IndexOf(prnname); end; //设置当前打印机 printer.PrinterIndex := GetPrnNameToIndex(form3.CmbSelectPrn.text); 我的程序里是这样的，打印正常，直接打印，不需要临时选择，你根据情况试试。
function GetPrnNameToIndex(PrnName: widestring): Integer; //根据打印机 名称 转换成 序号 begin result := printer.Printers.IndexOf(prnname); end; //设置当前打印机 printer.PrinterIndex := GetPrnNameToIndex(form3.CmbSelectPrn.text); 我的程序里是这样的，打印正常，直接打印，不需要临时选择，你根据情况试试。
