FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour FiveTech's FiveWeb (free up to version 1.0)
Posts: 566
Joined: Thu Aug 30, 2007 03:40 PM
Re: FiveTech's FiveWeb (free up to version 1.0)
Posted: Tue Nov 06, 2012 11:24 PM

Works fine in IE10, desktop and Modern UI version.
Dont work in IE9, Windows phone version (mobile).
very good job, but unfortunately we get on that tortuous terrain that web apps fall: works in browse, does not work at that, works one way in one, another in another way in other browse. a nightmare.

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: FiveTech's FiveWeb (free up to version 1.0)
Posted: Tue Nov 06, 2012 11:48 PM

Norberto,

I agree but it is better to have something (I mean: a way to deliver quick Web apps) instead of nothing... :-)

And it is not such big requirement to ask someone to use Google Chrome, in example...

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 566
Joined: Thu Aug 30, 2007 03:40 PM
Re: FiveTech's FiveWeb (free up to version 1.0)
Posted: Wed Nov 07, 2012 12:00 AM

Antonio, certainly yes. :)

best regards

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: FiveTech's FiveWeb (free up to version 1.0)
Posted: Wed Nov 07, 2012 02:26 AM
Testing the FiveWeb error system:

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

testerr.prg
Code (fw): Select all Collapse
#include "FiveWeb.ch"

memvar n

function Main()

   n++  // Here we generate an error

return nil
regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 9020
Joined: Thu Oct 06, 2005 08:17 PM
Re: FiveTech's FiveWeb (free up to version 1.0)
Posted: Wed Nov 07, 2012 09:12 AM
Antonio Linares wrote:And it is not such big requirement to ask someone to use Google Chrome, in example...


Yes, for developers, no problem. But customers would hardly agree to change browser. :-)

EMG
Posts: 1515
Joined: Thu Oct 30, 2008 02:37 PM
Re: FiveTech's FiveWeb (free up to version 1.0)
Posted: Wed Nov 07, 2012 09:58 AM

Antonio,

I think too is better to have something, instead of nothing. Thank you for your efforts.

Regards.

Posts: 1387
Joined: Fri May 23, 2008 01:33 PM
Re: FiveTech's FiveWeb (free up to version 1.0)
Posted: Wed Nov 07, 2012 02:30 PM
Antonio Linares wrote:Norberto,

I agree but it is better to have something (I mean: a way to deliver quick Web apps) instead of nothing... :-)

And it is not such big requirement to ask someone to use Google Chrome, in example...


I agree with you too. Thanks for all.
Regards,



Hakan ONEMLI



Harbour & MSVC 2022 & FWH 23.06
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: FiveTech's FiveWeb (free up to version 1.0)
Posted: Thu Nov 08, 2012 12:26 AM
Browses based on MySQL, using Ajax:

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

Please notice the URL clause of the browse that loads using Ajax the browse contents from whatever we may want. In this case is a standard FiveWeb php that retrieves the data from a MySQL database table.

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
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: FiveTech's FiveWeb (free up to version 1.0)
Posted: Thu Nov 08, 2012 09:01 AM
regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: FiveTech's FiveWeb (free up to version 1.0)
Posted: Fri Nov 09, 2012 04:12 PM
Implemented clause ACTION for Buttons. Actually the actions are executed on the client side, further on we will implement them for the server side too. Implemented function MsgInfo() for javascript using jquery ui and DOM (document object model).

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
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: FiveTech's FiveWeb (free up to version 1.0)
Posted: Sat Nov 10, 2012 11:16 AM
PullDown menus already implemented:

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
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: FiveTech's FiveWeb (free up to version 1.0)
Posted: Sun Nov 11, 2012 03:33 PM
Dynamically changing themes:

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
Posts: 566
Joined: Thu Aug 30, 2007 03:40 PM
Re: FiveTech's FiveWeb (free up to version 1.0)
Posted: Sun Nov 11, 2012 05:25 PM

Menus and themes dont work in IE10 (desktop and Modern UI). :cry:

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: FiveTech's FiveWeb (free up to version 1.0)
Posted: Sun Nov 11, 2012 07:45 PM

Norberto,

We are using standard JQuery UI so it seems as it is not compatible with IE 10...

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: FiveTech's FiveWeb (free up to version 1.0)
Posted: Sun Nov 11, 2012 11:17 PM
Starting a forms designer. We have the problem that when a control is activated as redimensionable and draggable, the others loose that feature. If we fix that, then we are on a the right way :-)

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