Order and save right now!
20% off with the dicscount code for Ultimate Pack and any another product for Delphi from Greatis Programming!
Use OpenPrinter procedure for getting printer handle and PrinterProperties procedure for opening printer properties window.
Don't forget include WinSpool and Printers in uses chapter.
uses WinSpool, Printers; ... procedure TForm1.Button1Click(Sender: TObject); var MyPrinter, MyDriver, MyPort: array[0..100] of Char; PrinterHandle, DevMode: THandle; begin Printer.GetPrinter(MyPrinter, MyDriver, MyPort, DevMode); OpenPrinter(MyPrinter, PrinterHandle, nil); PrinterProperties(Form1.Handle, PrinterHandle); end;
More for developers