error on win 10

[Silvio.Falconi]

ON win seven the exe run ok

on window 10 the exe make this error ...why ?

Code: Select all | Expand

Application
===========
   Path and name: C:\work\Prg\Orario\Main.Exe (32 bits)
   Size: 7,058,432 bytes
   Compiler version: xHarbour 1.2.3 Intl. (SimpLex) (Build 20150603)
   FiveWin  Version: FWHX 17.02
   Windows version: 6.2, Build 9200 

   Time from start: 0 hours 0 mins 0 secs 
   Error occurred at: 27-03-2018, 11:43:59
   Descrizione errore: Error BASE/1068  Parametro errato: accesso all'array
   Args:
     [   1] = U   
     [   2] = N   2

Stack Calls
===========
   Called from: .\source\classes\PDMENU.PRG => MENUADDITEM( 284 )
   Called from: source\Main.prg => TAPPLICATION:BUILDMENU( 578 )
   Called from: source\Main.prg => TAPPLICATION:NEW( 312 )
   Called from: source\Main.prg => MAIN( 67 )

[Antonio Linares]

Silvio,

Please provide a PRG to reproduce it, thanks

[Silvio.Falconi]

It's very strange ...is a simply menu and on that line there is nothing
On the Windows Seven I not Have that error and the exe run ok
This morning at school I have win10 the same exe make errors

Code: Select all | Expand

METHOD BuildMenu() CLASS TApplication

   local oMenu

   MENU ::oMenuMain  2010



 MENUITEM i18n("&Archivi")
    MENU
    MENUITEM i18n(  "Gestione anni Scolastici" ) ;
    MESSAGE i18n( "Gestione anni scolastici" )  ;
    RESOURCE "MENU_ESERCIZI";
    ACTION  Esercizi()

   SEPARATOR

     MENUITEM i18n("Gestione assenze docenti" ) ;
      MESSAGE i18n( "Gestione delle assenze e sostituzioni " )  ;
     RESOURCE "ASSENZE16" ;
     ACTION Assenze()

     SEPARATOR

      MENUITEM i18n("Tipo assenze docenti" ) ;
      MESSAGE i18n( "Gestione del tipo di assenze" )  ;
     RESOURCE "TIPO16" ;
     ACTION TipoAssenze()

      SEPARATOR

       MENUITEM i18n("Calendario festività e vacanze" ) ;
      MESSAGE i18n( "Calendario festività e vacanze " )  ;
     RESOURCE "GRID_PERIODIC" ;
     ACTION Calendario()

     SEPARATOR
     MENUITEM i18n( "Archivi complementari " )   RESOURCE 'SH_TABELLE'
     MENU
                   MENUITEM  i18n( "Archivio Docenti" )NAME "M_DOCENTI";
                   MESSAGE i18n( "archivio complementare docenti " );
                   ACTION Docenti()

                   MENUITEM  i18n( "Materie insegnamento" )NAME "M_MATERIE";
                   MESSAGE i18n( "archivio complementare materie " );
                   ACTION Materie()

                   MENUITEM  i18n( "Classi presenti  " ) NAME "M_CLASSI" ;
                   MESSAGE i18n( "archivio complementare classi " ) ;
                   ACTION Classi()

                   MENUITEM  i18n( "Aule - Laboratori  " ) NAME "M_AULE" ;
                   MESSAGE i18n( "archivio complementare aule - laboratori " )  ;
                   ACTION AULE()

                   MENUITEM  i18n( "Gruppi di classi   " ) NAME "M_GRUPPI" ;
                   MESSAGE i18n( "archivio complementare gruppi di classi " )  ;
                   ACTION GRUPPI()


                   SEPARATOR

                   MENUITEM  i18n( "Gestione Cattedre Docenti" ) NAME "M_ORE" ;
                   MESSAGE i18n( "Inserimento/modifica cattedre" ) ;
                   ACTION PCattedre()

                   SEPARATOR

                   MENUITEM  i18n( "Orario delle lezioni (Tabellone)   " ) NAME "M_ORE" ;
                   MESSAGE i18n( "Tabellone orario delle lezioni " ) ;
                   ACTION PNuovoTabellone()



       ENDMENU

     SEPARATOR

      MENUITEM i18n( "Specificare la stampante" );
      RESOURCE "MENU_CONFIGPRN" ;
      ACTION PrinterSetup() ;
      MESSAGE i18n( "Stabilire la configurazione della sua stampante. " )

     SEPARATOR
      MENUITEM  i18n( "Configurazione del programma" ) ;
       MESSAGE i18n( "Stabilire la configurazione del programma " )  ;
      RESOURCE "MENU_CONFIG"  ;
      Action  ::Configurazione(1)

      SEPARATOR
     MENUITEM i18n( "Uscire dal programma" ) RESOURCE "MENU_SALIR2" ;
     ACTION ::ExitFromBtn() ;
     MESSAGE i18n( " Terminare l'esecuzione dell'applicazione. " )
  ENDMENU




  MENUITEM "&Utilità"
            MENU
            MENUITEM  i18n( "Protezione del programma" );
             MESSAGE i18n( "Proteggere il programma con password criptata personale " )  ;
             RESOURCE "MENU_PROTEZ" ;
            Action Password()

            SEPARATOR
            MENUITEM  i18n( "Indicizzazione archivi" );
             MESSAGE i18n( "Avviare l'indicizzazione degli archivi " )  ;
            RESOURCE "MENU_INDICIZZA" ;
            Action Ut_Indexar()

            SEPARATOR
            MENUITEM  i18n( "Salvataggio  archivi" );
             MESSAGE i18n( "salvataggio degli archivi in un file compresso e datato " )  ;
            RESOURCE "MENU_BACK" ;
            Action ZipBackup()

            MENUITEM  i18n( "Recupero archivi" ) ;
             MESSAGE i18n( "Recupero di un salvataggio archivi " )  ;
            RESOURCE "MENU_RESTORE" ;
            Action ZipRestore()

            SEPARATOR

            MENUITEM  i18n( "Salvataggio archivi in XmL" ) ;
             MESSAGE i18n( "convertire gli archivi in formato xml " )  ;
            RESOURCE "MENU_XML" ;
            Action GenXML()

            MENUITEM  i18n( "Salvataggio archivi in Csv" ) ;
             MESSAGE i18n( "convertire gli archivi in formato csv  " )  ;
            RESOURCE "MENU_CSV"  ;
            Action GenTxt()


          ENDMENU






  MENUITEM "&Aiuto" // HELP
         MENU
         MENUITEM  i18n( "Aiuto del programma" ) ;
         RESOURCE "MENU_HELP" action  Winexec("HH"+"EurekaS.chm")  // action HelpIndex()

         MENUITEM  i18n( "Trucco del giorno" );
         ACTION TipOfDay(".\tips.ini") ;
         RESOURCE "MENU_TIPS"

        SEPARATOR
        MENUITEM  i18n( "Visitare il sito di eoeo" );
        RESOURCE "MENU_WEB" ;
        ACTION GoWeb("www.eoeo.it")

        MENUITEM  i18n( "Contattare per email l'autore" );
        RESOURCE "MENU_CONTATTI" ;
       ACTION GoMailE( "info@eoeo.it","Informazioni su "+::cAppname,"Vorrei informazioni sulla Vostra applicazione  "+::cAppname )

        MENUITEM  i18n( "Autore di "+::cAppname );
        RESOURCE "MENU_AUTORI" ;
        ACTION ::AppAcercade()
      ENDMENU
      ENDMENU






   RETURN ::oMenuMain

[Antonio Linares]

Silvio,

Please check that there are no extra or missings ENDMENU clauses