Changeset 82 for trunk/gui


Ignore:
Timestamp:
Feb 20, 2019, 6:27:50 PM (7 years ago)
Author:
Alex Taylor
Message:

CUPSWIZ and PRINTMAN add support for EPSONINK driver.
CUPSWIZ: fixed logic to find model in driver.

Location:
trunk/gui
Files:
1 added
8 edited

Legend:

Unmodified
Added
Removed
  • trunk/gui/printer/cupswiz/cupswiz.VRP

    r75 r82  
    66RunDirectory:
    77VRXWindow: __VREMainWindow,1,578,2746,5770,9106
    8 VRXWindow: __VRESectionListWindow,1,711,11900,4529,3891
    9 VRXWindow: __VREToolsWindow,1,1650,9973,5468,1665
     8VRXWindow: __VRESectionListWindow,1,723,11900,4529,3891
     9VRXWindow: __VREToolsWindow,1,1650,9973,5468,1661
    1010VRXWindow: __VREWindListWindow,1,5191,11900,2650,3891
    1111UserFile: 1
  • trunk/gui/printer/cupswiz/cupswiz.VRX

    r75 r82  
    444444                    CALL LINEOUT globals.!log1, 'PPD not found. Looking for model:' globals.!os2driver'.'globals.!prt_nick
    445445            END
    446             drv_model = PrinterExistsInDRV( globals.!os2driver, globals.!prt_nick )
    447             CALL LINEOUT globals.!log1, 'PrinterExistsInDRV(' globals.!os2driver',' globals.!prt_nick '):' drv_model
     446            drv_path = GetDriverSource( globals.!os2driver )
     447            drv_model = PrinterExistsInDRV( drv_path, globals.!prt_nick )
     448            CALL LINEOUT globals.!log1, 'PrinterExistsInDRV(' drv_path',' globals.!prt_nick '):' drv_model
    448449            IF drv_model == '' THEN DO
    449450                IF cups_ppd == '' THEN DO
     
    16861687               WORD( globals.!prt_nick, 1 ) == 'Hewlett-Packard' THEN
    16871688                globals.!os2driver = 'ECUPS-HP'
     1689            ELSE IF TRANSLATE( WORD( globals.!prt_nick, 1 )) == 'Epson' THEN
     1690                globals.!os2driver = 'EPSONINK'
    16881691            ELSE
    16891692                globals.!os2driver = 'ECUPS'
     
    20112014    CALL NLSSetText 'SW_ABOUT',  'Caption', 10                                          /* 10: Product Information */
    20122015    CALL NLSSetText 'DT_ABOUT1', 'Caption', 11                                          /* 11: eCups Printer Install Utility */
    2013     CALL NLSSetText 'DT_ABOUT2', 'Caption', 12, '1.17'                                  /* 12: Version %1 */
     2016    CALL NLSSetText 'DT_ABOUT2', 'Caption', 12, '1.18'                                  /* 12: Version %1 */
    20142017    CALL NLSSetText 'DT_ABOUT3', 'Caption', 13, '2010-2019'                             /* 13: (C) %1 Alex Taylor */
    20152018    CALL NLSSetText 'PB_ABOUT',  'Caption', 2                                           /* 10: Product Information */
  • trunk/gui/printer/cupswiz/readme.1st

    r59 r82  
    5252     - ECUPS.DRV     (eCups driver for Gutenprint and other filter packages)
    5353     - ECUPS-HP.DRV  (eCups driver for HPLIP)
     54     - EPSONINK.DRV  (CUPS driver for EPSONINK)
    5455     - PSPRINT.DRV   (Enhanced OS/2 Postscript driver replacement)
    5556
  • trunk/gui/printer/manager/PRINTOOL.VRP

    r77 r82  
    88VRXWindow: __VREMainWindow,1,964,4288,6697,8046
    99VRXWindow: __VRESectionListWindow,1,1084,16044,4204,4059
    10 VRXWindow: __VREToolsWindow,1,1096,14309,5475,1661
     10VRXWindow: __VREToolsWindow,1,1096,14309,5466,1663
    1111VRXWindow: __VREWindListWindow,1,5312,16044,3505,4059
    1212UserFile: 1
  • trunk/gui/printer/manager/PRINTOOL.VRX

    r77 r82  
    911911LoadSettings: PROCEDURE EXPOSE globals.
    912912
    913     globals.!version = '0.84'
     913    globals.!version = '0.85'
    914914    globals.!copyright = '2013-2019'
    915915
     
    24432443    CALL NLSSetText 'RB_DEVICE_SHIPPED',  'Caption', 261, _platform
    24442444    CALL NLSSetText 'RB_DEVICE_3RDPARTY', 'Caption', 262, _platform
     2445    CALL NLSSetText 'GB_DEVICE_LIST',     'Caption', 264
    24452446    CALL NLSSetText 'PB_DEVICE_OTHER',    'Caption', 188
    24462447    CALL NLSSetText 'PB_DEVICE_REFRESH',  'Caption', 63
     
    24582459    END
    24592460    PARSE UPPER VALUE VRGetIni('PrinterManager', 'ThirdParty', 'USER') WITH known_3p '00'x .
    2460     IF known_3p == '' THEN known_3p = 'ECUPS ECUPS-HP GUTENPRT PSPRINT'
     2461    IF known_3p == '' THEN known_3p = 'ECUPS ECUPS-HP EPSONINK GUTENPRT PSPRINT'
    24612462    DO i = 1 TO WORDS( known_3p )
    24622463        _basename = WORD( known_3p, i )
  • trunk/gui/printer/manager/readme.txt

    r77 r82  
    11PM Printer Manager
    2 Version 0.84
     2Version 0.85
    33
    44  Printer Manager is a new graphical printer management tool designed to
     
    7171--
    7272Alex Taylor
    73 January 2019
     73February 2019
  • trunk/gui/printer/manager/wpi/printman.wis

    r71 r82  
    122122
    123123    <PCK INDEX=1
    124         PACKAGEID="Alex Taylor\Printer Manager\Program\0\8\1"
     124        PACKAGEID="Alex Taylor\Printer Manager\Program\0\8\4"
    125125        TITLE="Printer Manager (including English language support)"
    126126        TARGET="=("DefaultPath")\printman"
  • trunk/gui/shared/PrintUtl.VRS

    r75 r82  
    183183 */
    184184PrinterExistsInDRV: PROCEDURE EXPOSE globals.
    185     PARSE UPPER ARG driver_name, printer_name
     185    PARSE UPPER ARG printer_drv, printer_name
    186186    printer_name = TRANSLATE( printer_name, '_', '.')
    187187
    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 ''
    190192
    191193    IF SysGetEA( printer_drv, '.EXPAND', 'exist_ea') <> 0 THEN RETURN ''
     
    202204    start = 1
    203205    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 )
    205208        _strend = POS('0'x, exist_models, start )
    206209        IF _strend == 0 THEN LEAVE
     
    647650    drv_list.0 = 0
    648651
    649     test_drivers = 'ECUPS ECUPS-HP PSPRINT'
     652    test_drivers = 'ECUPS ECUPS-HP EPSONINK PSPRINT'
    650653    DO i = 1 TO WORDS( test_drivers )
    651654        driver = WORD( test_drivers, i )
Note: See TracChangeset for help on using the changeset viewer.