Postup:
' Pracuje pouze pod
Windows NT a 2000
Private Declare
Function ConnectToPrinterDlg Lib "winspool.drv" _
(ByVal hWnd As Long, ByVal flags As Long) As Long
' 1. argument je
ukazatel na aktußlnφ formulß°
' 2. argument je rezervovßn a musφ b²t nula
ConnectToPrinter Me.hWnd,
0
Pod Windows 9x nenφ
tato API podporovßna a nejjednoduÜÜφ cesta je pou₧φt volßnφ Pr∙vodce
pro p°ipojenφ k tiskßrn∞ s pomocφ shellu:
' Pracuje pod
Windows 95, 98, NT a 2000
Shell
"rundll32.exe shell32.dll,SHHelpShortcuts_RunDLL AddPrinter"
|