Changeset 22 for trunk/gui/shared
- Timestamp:
- Feb 25, 2013, 6:33:32 AM (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gui/shared/PrintUtl.VRS
r19 r22 328 328 PARSE ARG driver, driverfull, model 329 329 330 ok = 0 330 331 targetdir = globals.!os2dir'\DLL\'driver 331 332 IF ( VRFileExists( targetdir'\'driver'.DRV') == 0 ) THEN DO 332 333 CALL VRMkDir targetdir 333 rc= CopyDriverToSource( driverfull, targetdir )334 ok = CopyDriverToSource( driverfull, targetdir ) 334 335 END 335 336 IF VRGetIni('PM_DEVICE_DRIVERS', driver, 'USER', 'NoClose') <> driverfull THEN 336 337 CALL VRSetIni 'PM_DEVICE_DRIVERS', driver, driverfull||'00'x, 'USER' 337 338 CALL VRSetIni 'PM_SPOOLER_DD', driver'.'model, driver'.DRV;;;'||'00'x, 'SYSTEM' 338 RETURN rc339 RETURN ok 339 340 340 341 … … 350 351 setup = 'PORTNAME='portname';PRINTDRIVER='driver'.'model';QUEUENAME='queuename';TAKEDEFAULTS=YES' 351 352 352 rc= SysCreateObject('WPPrinter', printername, '<WP_DESKTOP>', setup';OBJECTID='oid';', 'F')353 IF rc== 1 THEN353 ok = SysCreateObject('WPPrinter', printername, '<WP_DESKTOP>', setup';OBJECTID='oid';', 'F') 354 IF ok == 1 THEN 354 355 CALL SysMoveObject oid, '<WP_PRINTERSFOLDER>' 355 356 ELSE 356 rc= SysCreateObject('WPPrinter', printername, '<WP_DESKTOP>', setup';', 'F')357 358 RETURN rc357 ok = SysCreateObject('WPPrinter', printername, '<WP_DESKTOP>', setup';', 'F') 358 359 RETURN ok 359 360 360 361
Note:
See TracChangeset
for help on using the changeset viewer.