Mortscript NR_PDFReader.mscr funktioniert nicht

  • Habe navirunner new line v2 eingespielt: so weit alles ok, nur der PDF-Reader
    lies sich einfach nicht starten. Nach langem Studium der entsprechenden Mort
    Skripte habe ich schließlich ein eigenes erstellt, das auch läuft.


    Wenn es jemanden interessiert: hier ist mein Skript.


    ################################################
    #
    # MANUAL_PROMPT.mscr
    #
    ################################################
    #
    # Purpose: Prompts for the manual to be shown
    #
    #
    # Platform(s): PNA
    #
    # PNA Tested: Medion MD 97630, Model E4230 , Windows CE 5.0 Core
    #
    # Author: jwoegerbauer
    #
    # Rel. 0.a 3.7.2009
    #
    # Release Note(s): <none>
    #
    #
    #################################################
    # prerequisites: FOXIT READER 1.0 for Windows CE 5.0
    # http://mirrors.foxitsoftware.c…xitReader10_CE5.0_enu.zip
    #
    ################################################
    #
    Local()
    #
    isRunning = WndExists( "MANUAL_PROMPT" )
    # if MANUAL_PROMPT.exe is already running close it.
    # This is done to get consistent operation
    If ( isRunning )
    Close( "MANUAL_PROMPT" )
    EndIf
    #
    Set MYSLEEP, 300
    Set MANUAL_DIR, "\My Flash Disk\_Manuals\"
    Set MANUAL_READER, "\My Flash Disk\programme\PDFReader\Foxit Reader for WINCE 5.0.exe"
    Set WINDOW_NAME, "Foxit Reader" # for WINCE 5.0"
    #
    Sleep %MYSLEEP%
    #
    If (Not DirExists(%MANUAL_DIR%))
    SetMessageFont(20, "Verdana")
    BigMessage("^NL^^NL^Verzeichnis^NL^" & %MANUAL_DIR% & "^NL^nicht gefunden.", "Fehler")
    Exit
    EndIf
    #
    n=0
    ForEach FileName in files (%MANUAL_DIR% & "*.pdf")
    n=n+1
    ManualFilesFullFileName[n] = FileName
    #
    # extracts filename from full pathname
    Split(ManualFilesFullFileName[n], "\", 0, parts )
    ManualFiles[n] = parts[ ElementCount( parts ) ]
    Clear(parts)
    #
    EndForEach
    #
    If(n < 1)
    SetMessageFont(20, "Verdana")
    BigMessage("^NL^^NL^Keine Handbücher im Verzeichnis^NL^" & %MANUAL_DIR% & "^NL^gefunden.", "Fehler")
    Clear(ManualFiles)
    Clear(ManualFilesFullFilename)
    Exit
    EndIf
    #
    If (Not FileExists(%MANUAL_READER%))
    SetMessageFont(20, "Verdana")
    BigMessage("^NL^^NL^Programmdatei^NL^" & %MANUAL_READER% & "^NL^nicht gefunden!!", "Fehler")
    Clear(ManualFiles)
    Clear(ManualFilesFullFilename)
    Exit
    EndIf
    #
    # preset to cancelled
    index=0
    #
    SetChoiceEntryFormat(26, 20, "Verdana")
    index = Choice("ManualViewer", "^NL^*** Select the Manual to be shown ***^NL^", 0,0, ManualFiles)
    #
    Clear(ManualFiles)


    If(index=0)
    Clear(ManualFilesFullFileName)
    Sleep %MYSLEEP%
    Exit
    EndIf
    #
    isRunning = WndExists(%WINDOW_NAME% )
    # if WINDOW_NAME is already running close it.
    # This is done to get consistent operation
    If ( isRunning )
    Close(%WINDOW_NAME% )
    EndIf
    Sleep 1000
    #
    Set MANUAL_SELECTED, ManualFilesFullFileName[index]
    Clear(ManualFilesFullFileName)
    #
    Sleep %MYSLEEP%
    Run(%MANUAL_READER%)
    Sleep 1000


    # clicks 'menu'
    MouseClick (%WINDOW_NAME%,10, 10)
    Sleep %MYSLEEP%
    # selects 'open'
    SendDown
    Sleep %MYSLEEP%
    # opens file dialog
    MouseClick(%WINDOW_NAME%,10, 25)
    Sleep %MYSLEEP%
    # inputs file name
    SendKeys (%MANUAL_SELECTED%)
    Sleep %MYSLEEP%
    SendCR
    SendOK
    #
    # done for now
    Exit
    #
    ################################################

  • Hi & willkommen!


    1. ich würde an Deiner Stelle mal schnellstens die Mail-Adr. rausnehmen. Es sei denn, Du willst den Spamfilter testen! :D
    2. hast Du Dich etwas verlaufen. Hier geht's um Navigon, Du willst aber was zu GoPal V4 (und dem NR-Skin) verbreiten. Daher wärst Du hier richtiger: GoPal V4, NR und weitere Interessierte werden hier sicher kaum vorbeikommen! Wär schade um das schöne Skript! ;D


    Jetzt aber dort nicht nochmal posten, sondern über den <Melden>-Button einen Mod um Verschiebung dorthin bitten.

  • hallo Navirunner,


    F: Warum wohl habe ich dies Skript öffentlich gemacht?
    A: Damit alle was davon haben!!!


    In meiner privaten Fassung Deines Skins - vgl. angehängten Screenshot -
    hat dieses Skript sogar eine feste Verdrahtung im Hauptmenü erhalten
    (als einer von den 7 Fix-Buttons)