FiveTech Software tech support forums

... Gestione Esercizi." )

DEFINE TBBUTTON OF ::oBar ;
ACTION NIL ;
TOOLTIP i18n( "Gestione Attività" ) ;
MESSAGE i18n( "Gestione Attività." )

DEFINE TBSEPARATOR OF ::oBar


DEFINE TBBUTTON OF ::oBar ;
ACTION NIL ;
TOOLTIP i18n( "Gestione Movimenti" ) ;
MESSAGE i18n( "Gestione Movimenti." )

... oBar ;
ACTION ( lImprime:=.t., ::PrintPage() ) ; //aqui sería .t.
TOOLTIP Strtran(TXT_PRINT,"&","") ;
MESSAGE TXT_PRINT_CURRENT_PAGE

DEFINE TBSEPARATOR OF oBar

DEFINE TBBUTTON OF oBar ;
ACTION ( lImprime:=.f., ::oWnd:End() ) ; //aquí, .f.
TOOLTIP Strtran( TXT_EXIT, "&", "" ) ;
MESSAGE TXT ...

... TBBUTTON OF oBar ;
ACTION ::PrintPage() ; //aqui sería .t.
TOOLTIP Strtran(TXT_PRINT,"&","") ;
MESSAGE TXT_PRINT_CURRENT_PAGE

DEFINE TBSEPARATOR OF oBar

DEFINE TBBUTTON OF oBar ;
ACTION ::oWnd:End() ; //aquí, .f.
TOOLTIP Strtran( TXT_EXIT, "&", "" ) ;
MESSAGE TXT_EXIT_PREVIEW ...

... GOTO_NEXT_PAGE

DEFINE TBBUTTON OF oBar ;
ACTION ::BottomPage() ;
TOOLTIP Strtran( TXT_LAST, "&", "" ) ;
MESSAGE TXT_GOTO_LAST_PAGE

DEFINE TBSEPARATOR OF oBar

DEFINE TBBUTTON OF oBar ;
ACTION ::Zoom() ;
TOOLTIP Strtran( TXT_ZOOM, "&", "" ) ;
MESSAGE TXT_ZOOM_THE_PREVIEW

DEFINE TBBUTTON ...

... TXT_GOTO_NEXT_PAGE

DEFINE TBBUTTON OF oBar ;
ACTION BottomPage() ;
TOOLTIP Strtran(TXT_LAST,"&","") ;
MESSAGE TXT_GOTO_LAST_PAGE

DEFINE TBSEPARATOR OF oBar

DEFINE TBBUTTON OF oBar ;
ACTION Zoom() ;
TOOLTIP Strtran(TXT_ZOOM,"&","") ;
MESSAGE TXT_ZOOM_THE_PREVIEW

DEFINE TBBUTTON OF oBar ...

... oToolBar:SetTextRows( 2 )



DEFINE TBBUTTON OF oToolBar ;
ACTION avi601() ;
TOOLTIP "Visualiza Maestro De Productores Alfabetico"

DEFINE TBSEPARATOR OF oToolBar

DEFINE TBBUTTON OF oToolBar ;
ACTION avi602() ;
TOOLTIP "Visualiza Maestro De Productores NUmerico"

DEFINE TBSEPARATOR OF ...

... TXT_GOTO_NEXT_PAGE

DEFINE TBBUTTON OF oBar ;
ACTION BottomPage() ;
TOOLTIP Strtran(TXT_LAST,"&","") ;
MESSAGE TXT_GOTO_LAST_PAGE

DEFINE TBSEPARATOR OF oBar

DEFINE TBBUTTON OF oBar ;
ACTION Zoom() ;
TOOLTIP Strtran(TXT_ZOOM,"&","") ;
MESSAGE TXT_ZOOM_THE_PREVIEW

DEFINE TBBUTTON OF oBar ...

... TOOLTIP "Editar" ;
PROMPT "&Editar"

DEFINE TBBUTTON OF oToolBar ;
ACTION DelClient(oBrw2, .F. ) ;
TOOLTIP "Borrar" ;
PROMPT "&Borrar"

DEFINE TBSEPARATOR OF oToolBar

DEFINE TBBUTTON OF oToolBar ;
ACTION BUSPLAN( oBrw, norden ) ;
TOOLTIP "Buscar" ;
PROMPT "&Buscar"

RETURN NIL ...

... 1] BALLOON

DEFINE TBBUTTON OF oToolBar[1] ;
TOOLTIP "Nueva partida"

DEFINE TBBUTTON OF oToolBar[1] ;
TOOLTIP "Elimina partida"

DEFINE TBSEPARATOR OF oToolBar[1]

DEFINE TBBUTTON OF oToolBar[1] ;
TOOLTIP "Imprime relación"

oReBar[1]:InsertBand( oToolBar[1] )
RETURN NIL

ya probe ...

... ANSITOOEM("Salvar Registro")

DEFINE TBBUTTON OF oToolBarDlg ;
ACTION MSGINFO("Backup") ;
TOOLTIP ANSITOOEM("Elimina Registro")

DEFINE TBSEPARATOR OF oToolBarDlg

DEFINE TBBUTTON OF oToolBarDlg ;
ACTION MSGINFO("teste") ;
TOOLTIP ANSITOOEM("Relatório Modo Gráfico")

DEFINE TBBUTTON OF ...

... errors:

Syntax error: "parse error at "IMAGELIST"
Syntax error: "parse error at "TOOLBAR"
Syntax error: "parse error at "TBBUTTON"
Syntax error: "parse error at "TBSEPARATOR"

Also I get FixSay() and IsWin64() undefined function

Maybe the errors are because I am using FWH 2.5

Regards


George