FiveTech Software tech support forums

Code: Select all

Application
===========
   Path and name: C:\Work\Prg\family2\Main.Exe (32 bits)
   Size: 7,751,168 bytes
   Compiler version: Harbour 3.2.0dev (r1406271520)
   FiveWin  version: FWH 17.02
   C compiler version: Borland C++ 5.8.2 (32-bit)
   Windows version: 6.2, Build 9200 

   Time from start: 0 hours 0 mins 7 secs 
   Error occurred at: 11-09-2017, 11:34:15
   Error description: Error BASE/1066  Parametro errato: condizionale
   Args:
     [   1] = U   

Stack Calls
===========
   Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:NEWBAR( 547 )
   Called from: source\Main.prg => TAPPLICATION:BUILDBTNBAR4( 1337 )
   Called from: source\Main.prg => TAPPLICATION:NEW( 425 )
   Called from: source\Main.prg => MAIN( 72 )

Code: Select all

METHOD BuildBtnBar4() CLASS TApplication
    Local oHand
    DEFINE CURSOR oHand HAND

      DEFINE BUTTONBAR ::obar _3D SIZE 66, 64 OF ::oWndMain 2015 GDIPLUS //   NOBORDER
      ::nBarHeight := ::obar:nHeight
      ::obar:bRClicked := { || .t. }
      ::obar:oCursor:=  oHand




   DEFINE BUTTON OF ::obar ;
     RESOURCE "TOOLBAR_ESERCIZI"       ;
      PROMPT  "Esercizi" ;
     ACTION Esercizi()  ;
     TOOLTIP i18n( "Gestione Esercizi Finanziari" ) ;
     MESSAGE i18n( "Gestione Esercizi Finanziari" ) ;
      NOBORDER


     DEFINE BUTTON OF ::obar ;
     RESOURCE "TOOLBAR_ATTIVITA"       ;
      PROMPT  "Attività" ;
    ACTION Attivita() ;
          TOOLTIP i18n( "Gestione Attività" ) ;
         MESSAGE i18n( "Gestione Attività." ) ;
   GROUP  NOBORDER

     DEFINE BUTTON OF ::obar ;
     RESOURCE "TOOLBAR_APUNTES"       ;
      PROMPT  "Movimenti" ;
    ACTION Movimenti() ;
          TOOLTIP i18n( "Gestione Movimenti" ) ;
         MESSAGE i18n( "Elenco dei movimenti contabili" ) ;
     NOBORDER

   DEFINE BUTTON OF ::obar ;
     RESOURCE "TOOLBAR_PERIODIC"       ;
      PROMPT  "Scadenze" ;
    ACTION Periodici() ;
          TOOLTIP i18n( "Gestione Movimenti Periodici" ) ;
         MESSAGE i18n( "Gestione Movimenti Periodici." ) ;
     NOBORDER

     DEFINE BUTTON OF ::obar ;
     RESOURCE "TOOLBAR_BUDGET"       ;
      PROMPT  "Previsione" ;
    ACTION Preventivi() ;
          TOOLTIP i18n( "Gestione Preventivi di spesa" ) ;
         MESSAGE i18n( "Preventivi di spesa e reddito e situazione contabile" ) ;
     NOBORDER



     DEFINE BUTTON OF ::obar ;
     RESOURCE "TOOLBAR_GRAFICI"       ;
      PROMPT  "Statistiche" ;
    ACTION Grafico() ;
          TOOLTIP i18n( "Statistiche annuali o per causali" ) ;
         MESSAGE i18n( "Visualizzazione grafica statistica  dei movimenti contabili" ) ;
     NOBORDER


     DEFINE BUTTON OF ::obar ;
     RESOURCE "TOOLBAR_ENTRATE"       ;
      PROMPT  "Entrate" ;
    ACTION Entrate() ;
          TOOLTIP i18n( "Anagrafica per voci entrate" ) ;
         MESSAGE i18n( "Elenco delle causuali di entrata" ) ;
   GROUP  NOBORDER

   DEFINE BUTTON OF ::obar ;
     RESOURCE "TOOLBAR_CLIENTI"       ;
      PROMPT  "Soggetti" ;
    ACTION Clientes() ;
          TOOLTIP i18n( "Pagatori o  Soggetti" ) ;
         MESSAGE i18n( "Elenco dei soggetti paganti  oppure  clienti" ) ;
     NOBORDER

     DEFINE BUTTON OF ::obar ;
     RESOURCE "TOOLBAR_USCITE"       ;
      PROMPT  "Uscite" ;
    ACTION Uscite() ;
          TOOLTIP i18n( "Anagrafica per voci uscite" ) ;
         MESSAGE i18n( "Elenco delle causali di uscita" ) ;
    GROUP NOBORDER


     DEFINE BUTTON OF ::obar ;
     RESOURCE "TOOLBAR_FORNITORI"       ;
      PROMPT  "Fornitori" ;
    ACTION Proveedores() ;
          TOOLTIP i18n( "Fornitori di servizi o Destinazione" ) ;
         MESSAGE i18n( "Elenco dei fornitori di servizi" ) ;
     NOBORDER

       DEFINE BUTTON OF ::obar ;
     RESOURCE "TOOLBAR_CONTI"       ;
      PROMPT  "Conti" ;
    ACTION Conti() ;
          TOOLTIP i18n( "Gestione conti correnti e carte" ) ;
         MESSAGE i18n( "Anagrafica dei conti correnti e delle carte di redito con saldi" ) ;
   GROUP  NOBORDER

       DEFINE BUTTON OF ::obar ;
     RESOURCE "TOOLBAR_TRASFER"       ;
      PROMPT  "GiroConti" ;
    ACTION TrasferimentoConti() ;
          TOOLTIP i18n( "Gestione giroconti" ) ;
         MESSAGE i18n( "Elenco dei traferimenti da un conto corrente ad un altro" ) ;
     NOBORDER


      DEFINE BUTTON OF ::obar ;
     RESOURCE "RIBBON_BENI"       ;
      PROMPT  "Inventario" ;
    ACTION Inventario() WHEN  ::lPlus;
          TOOLTIP i18n( "Gestione beni inventariali" ) ;
         MESSAGE i18n( "Elenco dei beni inventariali" ) ;
   GROUP  NOBORDER

    DEFINE BUTTON OF ::obar ;
     RESOURCE "RIBBON_TABELLE"       ;
      PROMPT  "Tabelle" ;
       MENU   Inventario_Mnu()   ;
          TOOLTIP i18n( "Tabelle dei beni inventariali" ) ;
         MESSAGE i18n( "Elenco tabelle dei beni inventariali" ) ;
     NOBORDER

     DEFINE BUTTON OF ::obar ;
     RESOURCE "TOOLBAR_INDICIZZA"       ;
      PROMPT  "Indicizza" ;
      ACTION  Ut_Indexar()  ;
          TOOLTIP i18n( "Indicizzazione archivi" ) ;
         MESSAGE i18n( "Avviare l'indicizzazione degli archivi" ) ;
    GROUP  NOBORDER


       DEFINE BUTTON OF ::obar ;
     RESOURCE "RIBBON_ACERCADE"       ;
      PROMPT  "Autori" ;
      ACTION  ::AppAcercade()  ;
          TOOLTIP i18n( "Autori del programma" ) ;
         MESSAGE i18n( "Autori e CopyRights" ) ;
      NOBORDER

      DEFINE BUTTON OF ::obar ;
     RESOURCE "TOOLBAR_USCITA"       ;
      PROMPT  "Uscita" ;
      ACTION ::ExitFromBtn()  ;
          TOOLTIP i18n( "Uscita dal programma" ) ;
         MESSAGE i18n( "Terminare l'esecuzione del programma" ) ;
      NOBORDER

     RETURN NIL