FiveTech Software tech support forums

Code: Select all

#include "FiveTouch.ch"

#define SISTEMA "Sistema de Gestion Integrado JoseNet - Aplicativo Movil - Reportes"

function Main()

    local oDlg, aBtn[ 4 ]

    DEFINE DIALOG oDlg TITLE SISTEMA SIZE 800, 600

    @ 050, 90 BUTTON aBtn[01 ] PROMPT "Consulta Stocks" OF oDlg ;
      ACTION MsgInfo( "Ok!" ) SIZE 200, 30

    @ 100, 90 BUTTON aBtn[02 ] PROMPT "Precios" OF oDlg ;
      ACTION MsgInfo( "Ok!" ) SIZE 200, 30

    @ 150, 90 BUTTON aBtn[03 ] PROMPT "Ventas" OF oDlg ;
      ACTION MsgInfo( "Ok!" ) SIZE 200, 30

    ACTIVATE DIALOG oDlg CENTERED
   
return nil


class tWg_Android

    data nEmpresa init 3
    data cGestion init 'ventas'
    method new() constructor

endclass

method new() class tWg_Android

return Self