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

Posts: 582

Joined: Fri Oct 07, 2005 02:17 PM

Re: FiveWeb de FiveTech (gratis hasta la versión 1.0)
Posted: Wed Nov 07, 2012 04:19 PM

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

Enrrique Vertiz Pitta

Lima-Peru

xHb 1.23.1026X, Fwh 25.01, BCC74, MySQL 8.0.X, SQLLIB 1.9m

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Re: FiveWeb de FiveTech (gratis hasta la versión 1.0)
Posted: Wed Nov 07, 2012 09:38 PM

Enrique,

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

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

regards, saludos

Antonio Linares
www.fivetechsoft.com

Enrrique Vertiz

Posts: 582

Joined: Fri Oct 07, 2005 02:17 PM

Re: FiveWeb de FiveTech (gratis hasta la versión 1.0)
Posted: Wed Nov 07, 2012 10:12 PM

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

Enrrique Vertiz Pitta

Lima-Peru

xHb 1.23.1026X, Fwh 25.01, BCC74, MySQL 8.0.X, SQLLIB 1.9m

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Re: FiveWeb de FiveTech (gratis hasta la versión 1.0)
Posted: Thu Nov 08, 2012 12:22 AM

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 (fw): Select all Collapse

#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

regards, saludos

Antonio Linares
www.fivetechsoft.com

hmpaquito

Posts: 1515

Joined: Thu Oct 30, 2008 02:37 PM

Re: FiveWeb de FiveTech (gratis hasta la versión 1.0)
Posted: Thu Nov 08, 2012 08:28 AM

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

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Re: FiveWeb de FiveTech (gratis hasta la versión 1.0)
Posted: Thu Nov 08, 2012 09:00 AM

Nueva versión para descargar:

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

regards, saludos

Antonio Linares
www.fivetechsoft.com

Enrrique Vertiz

Posts: 582

Joined: Fri Oct 07, 2005 02:17 PM

Re: FiveWeb de FiveTech (gratis hasta la versión 1.0)
Posted: Thu Nov 08, 2012 02:04 PM

hmpaquito, gracias por el tip, probare con lo indicado.

Enrrique Vertiz Pitta

Lima-Peru

xHb 1.23.1026X, Fwh 25.01, BCC74, MySQL 8.0.X, SQLLIB 1.9m

sysctrl2

Posts: 1144

Joined: Mon Feb 05, 2007 07:15 PM

Re: FiveWeb de FiveTech (gratis hasta la versión 1.0)
Posted: Thu Nov 08, 2012 06:03 PM

la solucion que pone paco,
es la correcta,
abrir una nueva ventana de COMMAND.COM ( CMD )

saludos.

Cesar Cortes Cruz

SysCtrl Software

Mexico

' Sin +- FWH es mejor "

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Re: FiveWeb de FiveTech (gratis hasta la versión 1.0)
Posted: Fri Nov 09, 2012 04:09 PM

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 (fw): Select all Collapse

// 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

regards, saludos

Antonio Linares
www.fivetechsoft.com

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Re: FiveWeb de FiveTech (gratis hasta la versión 1.0)
Posted: Sat Nov 10, 2012 11:18 AM

Implementados los menues de persiana:

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

testmenu.prg

Code (fw): Select all Collapse

#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

regards, saludos

Antonio Linares
www.fivetechsoft.com

mastintin

Posts: 1516

Joined: Thu May 27, 2010 02:06 PM

Re: FiveWeb de FiveTech (gratis hasta la versión 1.0)
Posted: Sat Nov 10, 2012 11:37 AM

tutor01 compilado y funcionando en macosx (servidor apache integrado en el sistema )

mastintin

Posts: 1516

Joined: Thu May 27, 2010 02:06 PM

Re: FiveWeb de FiveTech (gratis hasta la versión 1.0)
Posted: Sun Nov 11, 2012 01:48 PM

Añadidos al repositorio los archivos mac_build.sh makefilemac para compilar fiveweb en mac ... :-)
Saludos a Todos.

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Re: FiveWeb de FiveTech (gratis hasta la versión 1.0)
Posted: Sun Nov 11, 2012 03:35 PM

Manuel.

gracias! :-)

regards, saludos

Antonio Linares
www.fivetechsoft.com

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Re: FiveWeb de FiveTech (gratis hasta la versión 1.0)
Posted: Sun Nov 11, 2012 03:35 PM

Dinamicamente cambiando temas:

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

themes.prg

Code (fw): Select all Collapse

#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

regards, saludos

Antonio Linares
www.fivetechsoft.com

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Re: FiveWeb de FiveTech (gratis hasta la versión 1.0)
Posted: Sun Nov 11, 2012 11:13 PM

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 (fw): Select all Collapse

#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

regards, saludos

Antonio Linares
www.fivetechsoft.com

FiveTech Support Forums