FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Nuevos controles para FWH
Posts: 492
Joined: Wed Nov 16, 2005 12:03 PM
Re: Nuevos controles para FWH
Posted: Mon Aug 10, 2020 03:23 PM

Antonio
Saludos
Excelente iniciativa
Es muy importante construccion de Dashboard necesario para soluciones ERP, basados en planificacion de objetivos que requieren ser medidos.
Necesario control de Acelerador similar al de un coche con las funcionalidades del control Meter.

Posts: 492
Joined: Wed Nov 16, 2005 12:03 PM
Re: Nuevos controles para FWH
Posted: Mon Aug 10, 2020 04:02 PM

Respuesta para Marcelo
Saludos
Referente a tu comentario sobre casos de exito con FW
En mi caso personal, hemos logramos miles de clientes en Venezuela gracias a FW quien funciona comodamente y eficientemente en Windows,
Uno de mis clientes por razones de inversion pretendio comprar otra aplicaci贸n, el proveedor le exigio cambiar todo el hardware quien requeria mas inversi贸n, mi cliente tiene PC con Windows XP con 2 gigas de memoria, tiene mas de 20mil productos. De igual forma tenemos clientes Industriales con toda la implementacion financiera mas procesos industriales, servicios (Maquila) mas comercializaci贸n.

Considero que esto depende mas del marketing para emprender y buscar nuevos clientes.
Considero FW una excelente herramienta ligera para desarrollar.

En mi caso desarrolle una funcionalidad para posicionar los controles de un formulario sin depender de Workshop y mi cliente podra redefinirlo, mas funcionalidades para generar codigos fuentes de formularios, voy a tomarme un tiempo para extraer estas funcionalidades de mi aplicacion para ofrecerlas a FW sin interes econ贸mico.

Si deseas un demo de mi aplicaci贸n creada con FW24, este es el sitio descarga, requiere MySQL 5.x

https://mega.nz/folder/xNNQkKTS#Jgu8WemIZONlzJVQRN9WYQ

Podras evaluar funcionalidades como generador de codigo, generador de reportes, diccionario de datos.
Podemos extraer funcionalidades para aportarlas para FW para que puedas generar aplicaciones m谩s rapidamente de facil mantenimiento-

mi correo adaptaprodrive@gmail.com
skype: juandatapro

Posts: 670
Joined: Wed Oct 19, 2005 06:41 PM
Re: Nuevos controles para FWH
Posted: Fri Aug 14, 2020 07:09 PM

Juan muchas gracias estaremos pendientes
un saludo cordial

Wilson 'W' Gamboa A
Wilson.josenet@gmail.com
Posts: 492
Joined: Wed Nov 16, 2005 12:03 PM
Re: Nuevos controles para FWH
Posted: Tue Aug 18, 2020 04:18 PM

Saludos
Controles para aceleraci贸n para construir DashBoard necesario para la implementacion de KPI requesito de soluci贸n ERP

Posts: 1279
Joined: Mon Feb 06, 2006 04:28 PM
Re: Nuevos controles para FWH
Posted: Mon Sep 07, 2020 07:41 PM

Una aplicaci贸n tipo xmate Verce etc... pero que permita agregar todos los archivos, indicar el principal y que se pueda seleccionar mediante un perfil si se compila para fwh o fwh64 y con cualquier compilador bcc msc, etc

De modo que use el editor de mi preferencia y no tenga que hacer 2000 cosas para poder compilar con el, simplemente agregar a las herramientas del editor esta aplicaci贸n, y listo.. compilar sin problemas para el compilador que quiera.

Saludos/Regards,

Jos茅 Murugosa

"Los errores en programaci贸n, siempre est谩n entre la silla, el teclado y la IA!!"
Posts: 990
Joined: Wed Oct 19, 2005 02:17 PM
Re: Nuevos controles para FWH
Posted: Mon Sep 07, 2020 08:26 PM

Jos茅,

yo te recomiendo FivEdit de Crist贸bal Navarroa. Adem谩s de ser una herramienta excepcional, Crist贸bal da un soporte increible.

Muchas gracias.

Saludos,

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Nuevos controles para FWH
Posted: Tue Sep 08, 2020 05:15 AM
Baxajaun wrote:Jos茅,

yo te recomiendo FivEdit de Crist贸bal Navarroa. Adem谩s de ser una herramienta excepcional, Crist贸bal da un soporte increible.

Muchas gracias.

Saludos,


+1
regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 418
Joined: Wed Nov 26, 2008 06:33 PM
Re: Nuevos controles para FWH
Posted: Tue Sep 08, 2020 08:58 PM
Saludos.

En cuanto al uso sel say + get, implemente esto:

Code (fw): Select all Collapse
/*----------------------------------------------------------------------------//
!short: SAY Y GET */

#xcommand @ <nRow>, <nCol> SAY [ <oSay> <label: PROMPT SAY,VAR SAY > ] <cText> GET [ <oGet> VAR ] <uVar> ;
             [ <pictsay: PICT SAY, PICTURE SAY> <cPictsay> ] ;
             [ <dlg: OF,WINDOW,DIALOG > <oWnd> ] ;
             [ FONT <oFont> ]  ;
             [ <lCentersay: CENTERED SAY, CENTER SAY > ] ;
             [ <lRightsay:  RIGHT SAY >    ] ;
             [ <lBorder: BORDER SAY >   ] ;
             [ <colorsay: COLOR SAY,COLORS SAY > <nClrTextsay> [,<nClrBacksay> ] ] ;
             [ SIZE SAY <nWidthsay>, <nHeightsay> ] ;
             [ <designsay: DESIGN SAY>  ] ;
             [ <updatesay: UPDATE SAY>  ] ;
             [ <lShaded: SHADED SAY, SHADOW SAY> ] ;
             [ <lBox:    BOX SAY  >  ] ;
             [ <lRaised: RAISED SAY> ] ;
             [ <adj: ADJUST SAY> ] ;
             [ <lTrans: TRANSPARENT SAY>];
             [ <pict: PICT, PICTURE> <cPict> ] ;
             [ VALID <ValidFunc> ] ;
             [ <color: COLOR,COLORS> <nClrFore> [,<nClrBack>] ] ;
             [ SIZE <nWidth>, <nHeight> ]  ;
             [ <design: DESIGN> ] ;
             [ CURSOR <oCursor> ] ;
             [ MESSAGE <cMsg> ] ;
             [ <update: UPDATE> ] ;
             [ WHEN <uWhen> ] ;
             [ <lCenter: CENTER, CENTERED> ] ;
             [ <lRight: RIGHT> ] ;
             [ ON CHANGE <uChange> ] ;
             [ <readonly: READONLY, NO MODIFY> ] ;
             [ <pass: PASSWORD> ] ;
             [ <lNoBorder: NO BORDER, NOBORDER> ] ;
             [ <help:HELPID, HELP ID> <nHelpId> ] ;
             [ ACTION <uAction> ] ;
             [ BITMAP <cBmpName> ] ;
             [ CUEBANNER <cCueText> ] ;
      => ;
          [ <oSay> := ] TSay():New( Row2Pxl(<nRow>), Col2Pxl(<nCol>)/2, <{cText}>,;
             [<oWnd>], [<cPictsay>], FontSay(<oFont>), <.lCentersay.>, <.lRightsay.>, <.lBorder.>,;
             .T., <nClrTextsay>, <nClrBacksay>, SIZE_LARGO(<cText>,<cPictsay>)-8, SIZE_ANCHO(.f.),;
             <.designsay.>, <.updatesay.>, <.lShaded.>, <.lBox.>, <.lRaised.>, <.adj.>,;
             <.lTrans.>, [<(oSay)>] ) ;;
          [ <oGet> := ] TGet():New( Row2Pxl(<nRow>), Col2Pxl(<nCol>)/2+SIZE_LARGO(<cText>)-4, bSETGET(<uVar>),;
             [<oWnd>], SIZE_LARGO(<uVar>,<cPict>), SIZE_ANCHO(.f.), <cPict>, <{ValidFunc}>,;
             <nClrFore>, <nClrBack>, FontGet(), <.design.>,;
             <oCursor>, .T., <cMsg>, <.update.>, <{uWhen}>,;
             <.lCenter.>, <.lRight.>,;
             [\{|nKey, nFlags, Self| <uChange>\}], <.readonly.>,;
             <.pass.>, [<.lNoBorder.>], <nHelpId>,,,,,, [\{|self| <uAction> \}],;
             <cBmpName>, [<(oGet)>], [<cCueText>] )


En ese momento lo inclui en fivewin.ch

@ 1, 2 say 'Ingeresa c贸digo' get cCodigo picture '99999999';
when ... valid ...

En la nueva version de fwh creo ya biene incluida...
No茅 Aburto S谩nchez
Tec. Prog. de Sistemas. -Morelia, Mich. M茅xico.
fwh 20.06, Harbour 3.2.0, bcc 7.4
TsBrowse 9.0, TsButton 7.0, xEdit 6.1
naburtos@gmail.com, noeaburto67@hotmail.com

Continue the discussion