FiveTech Support Forums

MENU oPopET POPUP 2007
   MENUITEM "Tabla &General" ACTION (oDlg:Hide(), ElbrFech(1,1), oDlg:Show()) MESSAGE "Elabora tabla de posiciones global del Campeonato"
   MENUITEM "Tabla &Local" ACTION (oDlg:Hide(), ElbrFech(2,1), oDlg:Show()) MESSAGE "Elabora tabla de posiciones como local de cada equipo del Campeonato"
   MENUITEM "Tabla &Visitante" ACTION (oDlg:Hide(), ElbrFech(3,1), oDlg:Show()) MESSAGE "Elabora tabla de posiciones como visitante de cada equipo del Campeonato"
   SEPARATOR
   MENUITEM ETPS[1] ACTION (oDlg:Hide(), ElbrEtpa(1), oDlg:Show()) MESSAGE "Elabora tabla de posiciones de la etapa seleccionada"
   MENUITEM ETPS[2] ACTION (oDlg:Hide(), ElbrEtpa(2), oDlg:Show()) MESSAGE "Elabora tabla de posiciones de la etapa seleccionada"
   MENUITEM ETPS[3] ACTION (oDlg:Hide(), ELBRETPA(3), oDlg:Show()) MESSAGE "Elabora tabla de posiciones de la etapa seleccionada"
   MENUITEM ETPS[4] ACTION (oDlg:Hide(), ELBRETPA(4), oDlg:Show()) MESSAGE "Elabora tabla de posiciones de la etapa seleccionada"
   MENUITEM ETPS[5] ACTION (oDlg:Hide(), ELBRETPA(5), oDlg:Show()) MESSAGE "Elabora tabla de posiciones de la etapa seleccionada"
   MENUITEM ETPS[6] ACTION (oDlg:Hide(), ELBRETPA(6), oDlg:Show()) MESSAGE "Elabora tabla de posiciones de la etapa seleccionada"
   MENUITEM ETPS[7] ACTION (oDlg:Hide(), ELBRETPA(7), oDlg:Show()) MESSAGE "Elabora tabla de posiciones de la etapa seleccionada"
   MENUITEM ETPS[8] ACTION (oDlg:Hide(), ELBRETPA(8), oDlg:Show()) MESSAGE "Elabora tabla de posiciones de la etapa seleccionada"
   MENUITEM ETPS[9] ACTION (oDlg:Hide(), ELBRETPA(9), oDlg:Show()) MESSAGE "Elabora tabla de posiciones de la etapa seleccionada"
   MENUITEM ETPS[10] ACTION (oDlg:Hide(), ELBRETPA(10), oDlg:Show()) MESSAGE "Elabora tabla de posiciones de la etapa seleccionada"
   MENUITEM ETPS[11] ACTION (oDlg:Hide(), ELBRETPA(11), oDlg:Show()) MESSAGE "Elabora tabla de posiciones de la etapa seleccionada"
   MENUITEM ETPS[12] ACTION (oDlg:Hide(), ELBRETPA(12), oDlg:Show()) MESSAGE "Elabora tabla de posiciones de la etapa seleccionada"
   MENUITEM ETPS[13] ACTION (oDlg:Hide(), ELBRETPA(13), oDlg:Show()) MESSAGE "Elabora tabla de posiciones de la etapa seleccionada"
   MENUITEM ETPS[14] ACTION (oDlg:Hide(), ELBRETPA(14), oDlg:Show()) MESSAGE "Elabora tabla de posiciones de la etapa seleccionada"
   MENUITEM ETPS[15] ACTION (oDlg:Hide(), ELBRETPA(15), oDlg:Show()) MESSAGE "Elabora tabla de posiciones de la etapa seleccionada" CHECK
ENDMENU

DEFINE WINDOW oVent TITLE "SicefWin Versión 3.0" BRUSH oBrush ICON oApp:cIcono MENU Menu_H()
...
    DEFINE BUTTONBAR oBarra 3DLOOK SIZE 30,32 TOP OF oVent CURSOR oCursor
    DEFINE BUTTON oBtn[3] OF oBarra RESOURCE "TABLA" ACTION (oDlg:Hide(), ElbrEtpa(nNumEtp), oDlg:Show()) NOBORDER TOOLTIP "Elabora tablas de Posiciones" MESSAGE "Elabora tablas de Posiciones" MENU oPopET
...
ACTIVATE WINDOW oVent MAXIMIZED VALID MsgYesNo("¿Desea terminar?","Elija opción SI/NO") ON INIT IF(lBien, Bienvenido(), ) ;
    ON PAINT ( SayRotated(oVent, oVent:nVertRes()-165, oVent:nHorzRes()-72, "SicefWin 3.0", oFont3, CLR_RED, CLR_WHITE, .T.), ;
                  SayRotated(oVent, oVent:nVertRes()-165, oVent:nHorzRes()-25, "Todo sobre el fútbol Ecuatoriano", oFont4, CLR_BLUE, CLR_WHITE, .T.) )