bestlong 怕失憶論壇's Archiver

bestlong 發表於 2012-10-1 14:53

Delphi 用程式碼進行印表機管理

Delphi 可以透過 function Printer 來取得 TPrinter 的全域實例(Global Instance)來進行印表機的管理。[code]
//使用 Printer 函數要先引用 Printers 單元
uses Printers;

procedure TForm1.FormCreate(Sender: TObject);
begin
  //清空列表,加入印表機列表,列表切換到目前選定印表機
  //cbPrinters: TComboBox;
  cbPrinters.Clear;
  cbPrinters.Items.Assign(Printer.Printers);
  cbPrinters.ItemIndex := Printer.PrinterIndex;
end;
[/code]
頁: [1]

Powered by Discuz! X1.5 Archiver   © 2001-2010 Comsenz Inc.