FiveTech Software tech support forums

www.FiveTechSoft.com
https://forums.fivetechsupport.com/

FiveWeb de FiveTech (gratis hasta la versión 1.0)

https://forums.fivetechsupport.com/viewtopic.php?t=25073

Page 6 of 19

Re: FiveWeb de FiveTech (gratis hasta la versión 1.0)

Posted: Wed Nov 07, 2012 4:19 pm
by Enrrique Vertiz
Antonio, compilo y funciona Ok, algunos comentarios :

Para los que usan WAMP, los archivos EXE se deben colocar en la carpeta CGI-BIN que esta dentro del directorio Wamp\Bin\apache\......cgi-bin.

En Windows 7 y Harbour los compilo sin problemas y los ejecuto.

Cuando compilo en WinXP con Harbour o en Win7 con xHarbour me bota el siguiente error al enlazar :

Error : Unresolved external '_HB_FUN_HB_GT_STD_DEFAULT' referenced from Fiveweb\Lib\FIVEWEB.LIB|fiveweb
Error : Unresolved external '_HB_FUN_HB_GT_STD' referenced from Fiveweb\Lib\FIVEWEB.LIB|fiveweb

Falta alguna LIB, alguna ruta ??, gracias

Re: FiveWeb de FiveTech (gratis hasta la versión 1.0)

Posted: Wed Nov 07, 2012 9:38 pm
by Antonio Linares
Enrique,

Estas usando FiveWeb/samples/build,bat para construir los ejemplos ?

La libreria gtstd.lib hay que enlazarla, pero ya lo hace build.bat

Re: FiveWeb de FiveTech (gratis hasta la versión 1.0)

Posted: Wed Nov 07, 2012 10:12 pm
by Enrrique Vertiz
Gracias Antonio, por alguna razon no lo tenia en el Build.bat, incluyendo esa LIB compilo sin problema con HARBOUR, ya esta Ok

Ahora con xHarbour, uso el Build.bat lo copio como Buildx.bat y saco las LIBs de HARBOUR y traigo las que estan en el FWH\Samples en el Buildx.bat, al parecer me falta algo porque me bota un error :
Unresolved external _HB_FUN__CLSLOCKDEF
Unresolved external _HB_FUN__CLSUNLOCKDEF
Falta alguna LIB en xHb ?, gracias

Re: FiveWeb de FiveTech (gratis hasta la versión 1.0)

Posted: Thu Nov 08, 2012 12:22 am
by Antonio Linares
Browses basados en MySQL, usando Ajax:

http://www.fivetechsoft.net/cgi-bin/testbrow

Fijaros en la claúsula URL del browse que carga mediante Ajax el contenido a partir de donde queramos. En este caso desde un php estandard de FiveWeb que accede a una tabla de una base de datos de MySQL.

testbrow.prg

Code: Select all | Expand

#include "FiveWeb.ch"

function Main()

   local oDlg, oBrw

   DEFINE DIALOG oDlg TITLE "MySQL browse" ;
      SIZE 1000, 600

   @ 10, 10 BROWSE oBrw SIZE 980, 500 OF oDlg ;
      URL "../fiveweb/mybrowse.php?name=clients"

   @ 500, 30 BUTTON "<<" OF oDlg SIZE 50, 35

   @ 500, 110 BUTTON ">>" OF oDlg SIZE 50, 35

   @ 500, 200 BUTTON "Add" OF oDlg

   @ 500, 330 BUTTON "Edit" OF oDlg

   @ 500, 460 BUTTON "Delete" OF oDlg

   @ 500, 590 BUTTON "Search" OF oDlg

   @ 500, 720 BUTTON "Print" OF oDlg

   @ 500, 850 BUTTON "Exit" OF oDlg

   ACTIVATE DIALOG oDlg

return nil

Re: FiveWeb de FiveTech (gratis hasta la versión 1.0)

Posted: Thu Nov 08, 2012 8:28 am
by hmpaquito
Enrique,

Esos unresolved external siempre me han salido a mi cuando desde el ambiente (sets) de harbour he invocado una compilacion de xHarbour (o viceversa, ya no me acuerdo). Es decir, la solucion, al menos para mi, siempre pasa por abrir una sesion nueva de CMD.

Saludos

Re: FiveWeb de FiveTech (gratis hasta la versión 1.0)

Posted: Thu Nov 08, 2012 9:00 am
by Antonio Linares
Nueva versión para descargar:

http://code.google.com/p/fiveweb/downloads/detail?name=fiveweb_0.8.zip&can=2&q=

Re: FiveWeb de FiveTech (gratis hasta la versión 1.0)

Posted: Thu Nov 08, 2012 2:04 pm
by Enrrique Vertiz
hmpaquito, gracias por el tip, probare con lo indicado.

Re: FiveWeb de FiveTech (gratis hasta la versión 1.0)

Posted: Thu Nov 08, 2012 6:03 pm
by sysctrl2
la solucion que pone paco,
es la correcta,
abrir una nueva ventana de COMMAND.COM ( CMD )

saludos.

Re: FiveWeb de FiveTech (gratis hasta la versión 1.0)

Posted: Fri Nov 09, 2012 4:09 pm
by Antonio Linares
Implementada la claúsula ACTION en los botones. De momento ejecutan acciones en la parte cliente, más adelante implementaremos las acciones en la aprte servidor tambien. Implementada la función MsgInfo() en javascript usando jquery ui y DOM.

http://www.fivetechsoft.net/cgi-bin/tutor03

tutor03.prg

Code: Select all | Expand

// Using controls

#include "FiveWeb.ch"

function Main()

   local oDlg, lValue := .T.
   
   DEFINE DIALOG oDlg TITLE "Hello FiveWeb" SIZE 600, 400
   
   @ 120,  70 BUTTON "One" SIZE 120, 50 OF oDlg ACTION MsgInfo( "one" )

   @ 120, 220 BUTTON "Two" SIZE 120, 50 OF oDlg ACTION MsgInfo( "two" )

   @ 120, 370 BUTTON "Three" SIZE 120, 50 OF oDlg ACTION MsgInfo( "three" )
   
   @ 200, 160 CHECKBOX lValue PROMPT "Tested" SIZE 150, 40 OF oDlg
   
   ACTIVATE DIALOG oDlg 

return nil


Image

Re: FiveWeb de FiveTech (gratis hasta la versión 1.0)

Posted: Sat Nov 10, 2012 11:18 am
by Antonio Linares
Implementados los menues de persiana:

http://www.fivetechsoft.net/cgi-bin/testmenu

testmenu.prg

Code: Select all | Expand

#include "FiveWeb.ch"

function Main()

   BuildMenu()

return nil

function BuildMenu()

   local oMenu

   MENU oMenu
      MENUITEM "Your app"
      MENU
         MENUITEM "About..." ACTION MsgInfo( "My app" )
         MENUITEM "Quit"
      ENDMENU 
      
      MENUITEM "Files"
      MENU 
         MENUITEM "Clients"
         MENUITEM "Stock"
         MENUITEM "Agents"
      ENDMENU
      
      MENUITEM "Reports"
      MENU 
         MENUITEM "Clients"
         MENU
            MENUITEM "List"
            MENUITEM "By Last name" 
            MENUITEM "By State" 
         ENDMENU
         
         MENUITEM "Stock"
         MENU 
            MENUITEM "By id"
            MENUITEM "By amount"
            MENUITEM "My price"
         ENDMENU
      ENDMENU
      
      MENUITEM "Utilities"
      
      MENUITEM "Help"
      MENU
         MENUITEM "Wiki"
      ENDMENU
   ENDMENU

return nil


Image

Re: FiveWeb de FiveTech (gratis hasta la versión 1.0)

Posted: Sat Nov 10, 2012 11:37 am
by mastintin
tutor01 compilado y funcionando en macosx (servidor apache integrado en el sistema ) :-)
Image

Re: FiveWeb de FiveTech (gratis hasta la versión 1.0)

Posted: Sun Nov 11, 2012 1:48 pm
by mastintin
Añadidos al repositorio los archivos mac_build.sh makefilemac para compilar fiveweb en mac ... :-)
Saludos a Todos.

Re: FiveWeb de FiveTech (gratis hasta la versión 1.0)

Posted: Sun Nov 11, 2012 3:35 pm
by Antonio Linares
Manuel.

gracias! :-)

Re: FiveWeb de FiveTech (gratis hasta la versión 1.0)

Posted: Sun Nov 11, 2012 3:35 pm
by Antonio Linares
Dinamicamente cambiando temas:

http://www.fivetechsoft.net/cgi-bin/themes

themes.prg

Code: Select all | Expand

#include "FiveWeb.ch"

function Main()

   local oDlg, oFld

   BuildMenu()

   DEFINE DIALOG oDlg SIZE 600, 400

   @ 10, 10 FOLDER oFld PROMPTS "One", "Two", "Three" OF oDlg ;
      SIZE 520, 230

   @ 260, 150 BUTTON "Ok" OF oDlg ACTION MsgInfo( "ok" )

   @ 260, 300 BUTTON "Cancel" OF oDlg ACTION MsgInfo( "cancel" )

   ACTIVATE DIALOG oDlg NOWAIT  

return nil

function BuildMenu()

   local oMenu

   MENU oMenu
      MENUITEM "Main theme"
      MENU
         MENUITEM "Light"
         MENU 
            MENUITEM "Base"         ACTION SetTheme( "base" )
            MENUITEM "Black-tie"    ACTION SetTheme( "black-tie" )
            MENUITEM "Blitzer"      ACTION SetTheme( "blitzer" )
            MENUITEM "Cupertino"    ACTION SetTheme( "cupertino" )
            MENUITEM "excite-bike"  ACTION SetTheme( "excite-bike" )
            MENUITEM "flick"        ACTION SetTheme( "flick" )
            MENUITEM "hot-sneacks"  ACTION SetTheme( "hot-sneaks" )
            MENUITEM "humanity"     ACTION SetTheme( "humanity" )
            MENUITEM "overcast"     ACTION SetTheme( "overcast" )
            MENUITEM "pepper-grinder" ACTION SetTheme( "pepper-grinder" )
            MENUITEM "redmond"      ACTION SetTheme( "redmond" )
            MENUITEM "smoothness"   ACTION SetTheme( "smoothness" )
            MENUITEM "south-street" ACTION SetTheme( "south-street" )
            MENUITEM "start"        ACTION SetTheme( "start" )
            MENUITEM "sunny"        ACTION SetTheme( "sunny" )
            MENUITEM "ui-lightness" ACTION SetTheme( "ui-lightness" )
         ENDMENU
         
         MENUITEM "Dark"
         MENU 
            MENUITEM "Dot-lub"      ACTION SetTheme( "dot-luv" )
            MENUITEM "Dark-hive"    ACTION SetTheme( "dark-hive" )
            MENUITEM "Eggplant"     ACTION SetTheme( "eggplant" )
            MENUITEM "le-frog"      ACTION SetTheme( "le-frog" )
            MENUITEM "mint-choc"    ACTION SetTheme( "mint-choc" )
            MENUITEM "swanky-purse" ACTION SetTheme( "swanky-purse" )
            MENUITEM "trontastic"   ACTION SetTheme( "trontastic" )
            MENUITEM "ui-darkness"  ACTION SetTheme( "ui-darkness" )
            MENUITEM "vader"        ACTION SetTheme( "vader" )
         ENDMENU
      ENDMENU  
   ENDMENU

return oMenu


Image

Re: FiveWeb de FiveTech (gratis hasta la versión 1.0)

Posted: Sun Nov 11, 2012 11:13 pm
by Antonio Linares
Comenzando un diseñador. Existe el problema de que cuando un control se activa como redimensionable y movible, los demas pierden esa capacidad. Si solucionamos esto, vamos por buen camino :-)

http://www.fivetechsoft.net/cgi-bin/fiveform

Code: Select all | Expand

#include "FiveWeb.ch"

function Main()

   local oDlg

   BuildMenu()

   DEFINE DIALOG oDlg SIZE 600, 400

   ACTIVATE DIALOG oDlg NOWAIT  

return nil

function BuildMenu()

   local oMenu

   MENU oMenu
      MENUITEM "Controls"
      MENU
         MENUITEM "Add control"
         MENU 
            MENUITEM "Say"    ACTION AddSay( "oDlg" )
            MENUITEM "Button" ACTION AddButton( "oDlg" )
         ENDMENU
      ENDMENU  
   ENDMENU

return oMenu
All times are UTC
Page 6 of 19

Powered by phpBB® Forum Software © phpBB Limited