41 lines
1.2 KiB
Plaintext
41 lines
1.2 KiB
Plaintext
compile insert PrintSetup_Equates
|
|
|
|
******************************************************************************
|
|
*
|
|
* Product : OpenInsight
|
|
* Version : 3.1
|
|
*
|
|
* Description: Insert record for the PrintSetup() utility
|
|
*
|
|
* History : (date, initials, notes)
|
|
* 01/23/96 cp Original programmer
|
|
*
|
|
******************************************************************************
|
|
|
|
declare function PrintSetup
|
|
declare subroutine PrintSetup
|
|
|
|
* To call the printer setup dialog:
|
|
*
|
|
* PrintSetup()
|
|
*
|
|
* To get a list of installed printer models, connected printers, and the
|
|
* default printer:
|
|
*
|
|
* PrinterCount = PrintSetup(PRN_GET$, Models, Printers, Default)
|
|
*
|
|
* To set the default printer:
|
|
*
|
|
* Success = PrintSetup(PRN_SET$, Default)
|
|
|
|
equ PRN_DLG$ to 1 ;* call printer setup dialog (default)
|
|
equ PRN_GET$ to 2 ;* get list of printers
|
|
equ PRN_SET$ to 3 ;* set current (ie. default) printer
|
|
equ PRN_DLG_CREATE$ to 4 ;* reserved
|
|
equ PRN_DLG_SETDEFAULT$ to 5 ;* reserved
|
|
equ PRN_DLG_OPTIONS$ to 6 ;* reserved
|
|
equ PRN_DLG_HELP$ to 7 ;* reserved
|
|
equ PRN_DLG_SELCHANGE$ to 8 ;* reserved
|
|
|
|
|