FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Encontré un pequeñito error en Fivewin.ch
Posts: 880
Joined: Fri Jan 12, 2007 08:35 PM
Encontré un pequeñito error en Fivewin.ch
Posted: Mon Oct 29, 2012 07:46 PM
Hola a todos :-)
si se fijan dentro de Fivewin.ch

en !short: BOX - GROUPS */
en la linea de #xcommand esta el error
a mi me causo problemas con la rutina del scaner
el GROUP esta fuera de lugar


/*----------------------------------------------------------------------------//
!short: BOX - GROUPS */

#xcommand @ <nTop>, <nLeft> GROUP [ <oGroup> ][ TO <nBottom>, <nRight> ]

Así debe quedar a si me funciona bien

#xcommand @ <nTop>, <nLeft> [GROUP <oGroup> ] [ TO <nBottom>, <nRight> ]


Espero que esto le ayude a quien se atore con algún problemita :-)

SE ACEPTAN SALUDITOS DE SU PARTE :-)


Saluditos :-)
Que es mejor que programar? creo que nada :)
Atropellada pero aqui ando :P

I love Fivewin

séʌǝɹ ןɐ ɐʇsǝ opunɯ ǝʇsǝ
Posts: 564
Joined: Thu Oct 13, 2005 09:23 AM
Re: Encontré un pequeñito error en Fivewin.ch
Posted: Tue Oct 30, 2012 08:13 PM

Muchas gracias, has encontrado la causa de un error que apareció de repente al compilar mis programas.

Saluditos de mi parte,

Posts: 880
Joined: Fri Jan 12, 2007 08:35 PM
Re: Encontré un pequeñito error en Fivewin.ch
Posted: Wed Oct 31, 2012 12:55 AM

De nada José Luis me dio gusto en apoyar a un que sea una pequeña linea :mrgreen:

Saluditos :wink:

Que es mejor que programar? creo que nada :)
Atropellada pero aqui ando :P

I love Fivewin

séʌǝɹ ןɐ ɐʇsǝ opunɯ ǝʇsǝ
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
Re: Encontré un pequeñito error en Fivewin.ch
Posted: Wed Oct 31, 2012 02:29 AM

Aida, Jose Luis,

Cual era la línea de código que fallaba al compilar ?

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 880
Joined: Fri Jan 12, 2007 08:35 PM
Re: Encontré un pequeñito error en Fivewin.ch
Posted: Wed Oct 31, 2012 02:39 AM
Hola cuando compile el a_scan.prg como parte de mi programita me salio un error y me di cuenta que era en esta parte del programa
en las dos primeras lineas que tienen PROMPT

Code (fw): Select all Collapse
  x:=VIR_01_IDC_STATIC4
@ x[1], x[2] to x[3], x[4] PROMPT "CONFIGURACIÓN:" of OdLG pixel font ofont color CLR_RED //  [, <nClrBack> ]
   x:=VIR_01_IDC_STATIC5
@ x[1], x[2] to x[3], x[4] PROMPT "FICHERO:" of OdLG pixel font ofont color CLR_RED //  [, <nClrBack> ]
   x:=VIR_01_IDC_STATIC1
@ x[1], x[2] say "Resolución (ppp) " size x[3], x[4] of oDlg pixel
   x:=VIR_01_IDC_STATIC2
@ x[1], x[2] say "Color - Blanco y Negro" size x[3], x[4] of oDlg pixel
   x:=VIR_01_IDC_STATIC6
@ x[1], x[2] say "Nombre del fichero de destino" size x[3], x[4] of oDlg pixel
   x:=VIR_01_IDC_STATIC7
@ x[1], x[2] say "Carpeta de destino" size x[3], x[4] of oDlg pixel


y se me ocurrio revisar el fivewin.ch

y ahi encontre lo que describi al inicio de mi aviso

Saluditos :-)
Que es mejor que programar? creo que nada :)
Atropellada pero aqui ando :P

I love Fivewin

séʌǝɹ ןɐ ɐʇsǝ opunɯ ǝʇsǝ
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
Re: Encontré un pequeñito error en Fivewin.ch
Posted: Wed Oct 31, 2012 10:27 AM

Aida,

muchas gracias! :-)

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 330
Joined: Fri May 25, 2007 09:06 PM
Re: Encontré un pequeñito error en Fivewin.ch
Posted: Wed Oct 31, 2012 02:37 PM

Master Antonio,,, Aida querida,, y colegas

no creo que sea lógico ese cambio.. mas bien debe ser propio de cada uno.. si te acomoda a las necesidades de como escribieron el fuente de los programas

Ahora porque no es lógico.

Digamos que mis fuentes no los leo yo, sino un colega y ve esta linea tomando el ejemplo de AIDA

x:=VIR_01_IDC_STATIC4
@ x[1], x[2] to x[3], x[4] PROMPT "CONFIGURACIÓN:" of OdLG pixel font ofont color CLR_RED // [, <nClrBack> ]
x:=VIR_01_IDC_STATIC5

dios que es eso, dira..
1.- no indica que objeto es..
2.- el colega podra deducir segun su conocimiento que es un GROUP,, y quizas otro objeto mal escrito desde codigo.

ven porque no es logico,,
lo correcto es

x:=VIR_01_IDC_STATIC4
@ x[1], x[2] GROUP to x[3], x[4] PROMPT "CONFIGURACIÓN:" of OdLG pixel font ofont color CLR_RED // [, <nClrBack> ]
x:=VIR_01_IDC_STATIC5

espero comentarios al respecto..

Posts: 1074
Joined: Fri Oct 07, 2005 01:56 PM
Re: Encontré un pequeñito error en Fivewin.ch
Posted: Wed Oct 31, 2012 02:40 PM

Hola

Estoy de acuerdo con mantonio,

Saludos
Patricio

__________________________________________________________________
Version: Harbour 3.2.0dev (r1307082134),Compiler: Borland C++ 5.8.2 (32-bit)
PCode version: 0.3, FWH 13.2
http://www.sialm.cl
Posts: 1144
Joined: Mon Feb 05, 2007 07:15 PM
Re: Encontré un pequeñito error en Fivewin.ch
Posted: Wed Oct 31, 2012 04:55 PM

Solucion al fin, gracias por compartirlo,
Saluditos.

Cesar Cortes Cruz

SysCtrl Software

Mexico



' Sin +- FWH es mejor "
Posts: 302
Joined: Fri Apr 23, 2010 04:30 AM
Re: Encontré un pequeñito error en Fivewin.ch
Posted: Wed Oct 31, 2012 08:55 PM

Hola,

Cuando me encontré con la misma situación opte por colocar GROUP y solucione el inconveniente, la omisión la hizo el creador de la clase en el ejemplo porque en la version que se desarollo tscan no era requerida.

Gracias Aida por el Aporte.

Slds

Nicanor Martinez M.
Auditoria y Sistemas Ltda.
MicroExpress Ltda.
FW + FWH + XHARBOUR + HARBOUR + PELLES C + XDEVSTUDIO + XEDIT + BCC + VC_X86 + VCC_X64 + MINGW + R&R Reports + FastReport + Tdolphin + ADO + MYSQL + MARIADB + ORACLE
nnicanor@yahoo.com
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
Re: Encontré un pequeñito error en Fivewin.ch
Posted: Wed Oct 31, 2012 10:48 PM

En mi opinión la sintaxis correcta debiera ser:

xcommand @ <nTop>, <nLeft> GROUP [ <oGroup> ] [ TO <nBottom>, <nRight> ] ...

ya que el control sobre el que estamos centrados es el GROUP y tiene que estar como identificador principal del comando.

Se debería modificar el código fuente, que es erróneo, y no el comando :-)

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 330
Joined: Fri May 25, 2007 09:06 PM
Re: Encontré un pequeñito error en Fivewin.ch
Posted: Wed Oct 31, 2012 11:26 PM

Master Antonio,, queda asi entonces
GRACIAS

Posts: 880
Joined: Fri Jan 12, 2007 08:35 PM
Re: Encontré un pequeñito error en Fivewin.ch
Posted: Thu Nov 01, 2012 02:56 AM

BOBA :cry:

Que es mejor que programar? creo que nada :)
Atropellada pero aqui ando :P

I love Fivewin

séʌǝɹ ןɐ ɐʇsǝ opunɯ ǝʇsǝ
Posts: 115
Joined: Sat Mar 07, 2009 09:36 PM
Re: Encontré un pequeñito error en Fivewin.ch
Posted: Thu Nov 01, 2012 09:10 AM

Gracias Aida.... como siempre a tus ordenes desde Escobar ("ciudad de las flores") cariños. juan carlos. :P

Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
Re: Encontré un pequeñito error en Fivewin.ch
Posted: Thu Nov 01, 2012 09:50 AM

Aida,

Para nada, solucionastes el problema, que es lo que cuenta :-)

regards, saludos

Antonio Linares
www.fivetechsoft.com