如何返回OpenDialog1设置的打印机名字? 如何返回OpenDialog1设置的打印机名字? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 //没确认过,也许是这样uses Printers;procedure TForm1.Button1Click(Sender: TObject);begin if not PrintDialog1.Execute then Exit; if Printer.Printers.Count > 0 then Caption := Printer.Printers[Printer.PrinterIndex];end;//同样的帖子别发两份 如何将一个datetime类型的字段赋为空值啊? 想找兼职做啊,三年Delphi/PHP/数据库经验 分辨率的问题? 如何在Dbgrid中实现类似于ComboBox的功能? 送分!今天开心! listbox中能使用图标吗? 怎样把一串数值转换成真人发音, 把金额读出来? 疑问! 求救!!! 请问如何设置TADOQuery为Readonly,我找不到相关属性 有关控制外部程序窗口的问题,请教诸位? 返回PrinterSetupDialog(PrinterDialog)选择的打印机名字的命令怎么写?
uses Printers;procedure TForm1.Button1Click(Sender: TObject);
begin
if not PrintDialog1.Execute then Exit;
if Printer.Printers.Count > 0 then
Caption := Printer.Printers[Printer.PrinterIndex];
end;
//同样的帖子别发两份