Changeset 82 for trunk/gui/shared
- Timestamp:
- Feb 20, 2019, 6:27:50 PM (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gui/shared/PrintUtl.VRS
r75 r82 183 183 */ 184 184 PrinterExistsInDRV: PROCEDURE EXPOSE globals. 185 PARSE UPPER ARG driver_name, printer_name185 PARSE UPPER ARG printer_drv, printer_name 186 186 printer_name = TRANSLATE( printer_name, '_', '.') 187 187 188 printer_drv = globals.!os2dir'\DLL\'driver_name'\'driver_name'.DRV' 189 /* ?? TODO: install driver_name if not found (prompt first) ?? */ 188 IF STREAM( printer_drv, 'C', 'QUERY EXISTS') == '' THEN 189 printer_drv = GetDriverSource( VRParseFilePath( printer_drv, 'N')) 190 IF STREAM( printer_drv, 'C', 'QUERY EXISTS') == '' THEN 191 RETURN '' 190 192 191 193 IF SysGetEA( printer_drv, '.EXPAND', 'exist_ea') <> 0 THEN RETURN '' … … 202 204 start = 1 203 205 found = '' 204 DO WHILE ( found == 0 ) & ( start < total_len ) 206 CALL LINEOUT globals.!log1, 'Looking for "'printer_name'" in' printer_drv'...' 207 DO WHILE ( found == '') & ( start < total_len ) 205 208 _strend = POS('0'x, exist_models, start ) 206 209 IF _strend == 0 THEN LEAVE … … 647 650 drv_list.0 = 0 648 651 649 test_drivers = 'ECUPS ECUPS-HP PSPRINT'652 test_drivers = 'ECUPS ECUPS-HP EPSONINK PSPRINT' 650 653 DO i = 1 TO WORDS( test_drivers ) 651 654 driver = WORD( test_drivers, i )
Note:
See TracChangeset
for help on using the changeset viewer.