FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexAll discussionsLogin (GitHub)
Board index FiveWin para Harbour/xHarbour Mi ejecutable da error con XBrowse en un pc y en otro no
jfafive
Posts: 396
Joined: Tue Mar 18, 2008 09:41 PM
Mi ejecutable da error con XBrowse en un pc y en otro no
Posted: Wed Apr 29, 2009 02:08 PM
Hola de nuevo. :-)

Tengo una duda muy extra帽a y quisiera saber si alguien puede ayudarme con esto.
Se trata de una aplicaci贸n que hace una consulta de datos por XBrowse.

Code (fw): Select all Collapse
REDEFINE XBROWSE oXbr ;
   RECSET oRs ID ID_BRW OF oDlg AUTOSORT ;

oXbr:nColDividerStyle     := LINESTYLE_LIGHTGRAY
oXbr:nRowDividerStyle    := LINESTYLE_LIGHTGRAY

oXbr:nMarqueeStyle         := MARQSTYLE_HIGHLROW
oXbr:bClrSelFocus            := { || { CLR_CYAN, CLR_SALMON } }
oXbr:lColDividerComplete := .f.
oXbr:lAllowRowSizing       := .f.
oXbr:lAllowColSwapping   := .t.
oXbr:lAllowColHiding       := .f.
oXbr:lHScroll                   := .f.
oXbr:lVScroll                 := .t.
oXbr:l2007               := .t.
oXbr:lHeader             := .t.


ACTIVATE DIALOG oDlg 
    ON INIT ( oXbr:aCols[1]:cHeader := "Nombre",;
             oXbr:aCols[2]:cHeader := "Apellidos",;
             oXbr:aCols[1]:nWidth  := 70,;
             oXbr:aCols[2]:nWidth  := 110,;
             oXbr:aCols[3]:Hide() ) 

oRs:Close()


Lo extra帽o es que en mi pc el XBrowse corre bi茅n.
Pero si lo ejecuto en el portatil, me da un error en el c贸digo incluido en ON INIT.
Si inhabilito este c贸digo, funciona bi茅n en los dos.

驴como es posible que d茅 un error en un pc y en otro no?
Es el mismo ejecutable el que uso.

El error es del tipo 'Error Array argument...'
Parece que al windows de portatil, no le gusta el c贸digo que especifico en la clausula ON INIT.

驴a alguien de ustedes le ha ocurrido algo similar?
Gracias.
:-)
Javier,

FWH 8.04 2008
Ricardo Ramirez E.
Posts: 161
Joined: Wed Jan 25, 2006 10:45 AM
Re: Mi ejecutable da error con XBrowse en un pc y en otro no
Posted: Wed Apr 29, 2009 02:43 PM

Hola...
No das detalles de los sistemas operativos que usas de todas formas... particularmente a mi la TXbrowse funciona de perlas en Windows XP e Vista.

Saludos

Ricardo R.

xHarbour 1.1.0 Simplex , Microsoft Visual Studio 2008, Bcc55, Fwh Build. 9.01
jfafive
Posts: 396
Joined: Tue Mar 18, 2008 09:41 PM
Re: Mi ejecutable da error con XBrowse en un pc y en otro no
Posted: Wed Apr 29, 2009 03:43 PM

En los dos equipos tengo Windows XP.
En los dos tengo la Home Edition Versi贸n 2002 ServicePack 3

Un saludo :cry:

Javier,

FWH 8.04 2008
Patricio Avalos Aguirre
Posts: 1074
Joined: Fri Oct 07, 2005 01:56 PM
Re: Mi ejecutable da error con XBrowse en un pc y en otro no
Posted: Wed Apr 29, 2009 10:40 PM

hola

Podr铆as mostrar el error.log para verlo

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
QAZWSX2K
Posts: 364
Joined: Tue Oct 25, 2005 07:06 PM
Re: Mi ejecutable da error con XBrowse en un pc y en otro no
Posted: Thu Apr 30, 2009 07:06 PM

No te faltara rn la laptop algun dll como del tipo prev32.dll que tienen que estar locales donde se ejecuta el programa

Software especializado para oficinas contables con grandes volumenes de Informacion
Impresion de todos los formularios del Seniat, Dian

alex_patino74@hotmail.com
whatsapp 57+3214777217
jfafive
Posts: 396
Joined: Tue Mar 18, 2008 09:41 PM
Re: Mi ejecutable da error con XBrowse en un pc y en otro no
Posted: Mon May 04, 2009 04:53 PM

Hola de nuevo!

Lo primero, perdonad por tardar en contestar.
Pero el puente que hemos tenido he preferido desconectar.

Pues si es cierto que el programa lo ejecuto en un laptop donde no hay instalado FWH.
Estoy casi seguro de que no le paso alguna / s DLL.

De modo que voy a hacer pruebas.
Pero como digo, estoy casi seguro de que va a ser eso. Pues prob茅 mi aplicaci贸n en el pc de un amigo que tambien tiene FWH y no le d谩 error ninguno.

Voy a averiguar que DLL's son las que le duelen al XBrowse (jeje)

Un saludito y Gracias por vuestra ayuda.

:wink:

Javier,

FWH 8.04 2008
Daniel Garcia-Gil
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 PM
Re: Mi ejecutable da error con XBrowse en un pc y en otro no
Posted: Mon May 04, 2009 05:00 PM

Saludos...
Aparte de Prev32.dll
Con la version actual la unica DLL que podria usar la xbrowse es para exponer imagenes de diferente formato al BMP, ya que usa la FreeImage.dll para realizar tal operacion, para versiones anteriores no es necesaria niguna otra...

Seria de gran ayuda que colocases el error generado, como te comenta patricio (coloca el error.log)

our best documentation is the source code
Isla de Margarita Venezuela.
danielgarciagil@gmail.com
http://tdolphin.blogspot.com/
https://www.dropbox.com/referrals/NTI5Njk4MDc1OQ?src=global9
jfafive
Posts: 396
Joined: Tue Mar 18, 2008 09:41 PM
Re: Mi ejecutable da error con XBrowse en un pc y en otro no
Posted: Mon May 04, 2009 05:19 PM

Gracias Daniel,

No me olvido del error.
He de reproducirlo en el laptop donde ocurri贸.
Pero mi amigo est谩 de viaje y hasta que no vuelva, no podr谩 publicar el error.

Tomo nota y lo publico en cuanto pueda.
Un saludo,

:mrgreen:

Javier,

FWH 8.04 2008
jfafive
Posts: 396
Joined: Tue Mar 18, 2008 09:41 PM
Re: Mi ejecutable da error con XBrowse en un pc y en otro no
Posted: Thu May 07, 2009 01:54 PM
Hola a todos!

Ya tengo el log con el error.
Aqu铆 os lo dejo.

Saludoos.

Code (fw): Select all Collapse
Application
===========
   Path and name: C:\Documents and Settings\USUARIO\Escritorio\prueba.exe (32 bits)
   Size: 2,081,280 bytes
   Time from start: 0 hours 0 mins 6 secs 
   Error occurred at: 07-05-09, 12:07:38
   Error description: Error BASE/1132  Error de rango: acceso al array
   Args:
     [   1] = A   { ... }
     [   2] = N   4

Stack Calls
===========
   Called from: .\consulta.PRG => (b)FCONSULTA(0)
   Called from:  => TDIALOG:INITIATE(0)
   Called from:  => TDIALOG:HANDLEEVENT(0)
   Called from:  => DIALOGBOX(0)
   Called from:  => TDIALOG:ACTIVATE(0)
   Called from: .\consulta.PRG => FCONSULTA(0)
   Called from: .\consulta.PRG => (b)FOPENCONSULTAS(0)
   Called from:  => TBTNBMP:CLICK(0)
   Called from:  => TBTNBMP:LBUTTONUP(0)
   Called from:  => TWINDOW:HANDLEEVENT(0)
   Called from:  => TCONTROL:HANDLEEVENT(0)
   Called from:  => TBTNBMP:HANDLEEVENT(0)
   Called from: .\source\classes\WINDOW.PRG => _FWH(0)
   Called from:  => WINRUN(0)
   Called from:  => TMDIFRAME:ACTIVATE(0)
   Called from: .\prueba.PRG => MAIN(0)

System
======
   CPU type:         Intel(R) Pentium(R) M processor 1.60GHz 600 Mhz
   Hardware memory: 383 megs

   Free System resources: 90 %
        GDI    resources: 90 %
        User   resources: 90 %

   Compiler version: Harbour devel build 1.1-1 Intl.
   Windows version: 5.1, Build 2600 Service Pack 3

   Windows total applications running: 42
      1 TF_FloatingLangBar_WndTitle
      2 CiceroUIWndFrame
      3 M
      4 Default IME
      5 SysFader
      6 ATKOSD
      7 Logitech_HiddenMessageWnd_E1000FE7-BFF5-4746-9792-218C4CE4851D
      8 QuickCam
      9 Escriba una pregunta
     10 Seleccione que registro quiere consultar.
     11 Selecciona registro a consultar
     12 La prueba Services S.L. - [MDI Child 1]
     13 DDE Server Window
     14 .NET-BroadcastEventWindow.2.0.0.0.378734a.0
     15 Acrobat IEHelper
     16 documentacion - Microsoft Word
     17 MCI command handling window
     18 LogiTray
     19 Connections Tray
     20 medusa_callbackpostmessage_579D20BC-1CFA-46b9-8A42-9D244829ABB5
     21 LVComSXWnd
     22 DIEmWin
     23 McAgent_Main_Hidden_Window
     24 Medidor de energ铆a
     25 HControl
     26 MS_WebcheckMonitor
     27 Touchpad driver tray icon window
     28 TouchPad object helper window
     29 Touchpad driver helper window
     30 Touchpad driver backward compatibility window
     31 SMax4PNP
     32 AEBalloonTip
     33 Agere Systems Soft Modem Monitor
     34 SoundMax4
     35 ATI Tray Icon Application
     36 ATI video bios poller client
     37 SQL Server Configuration Manager
     38 GDI+ Window
     39 Object Explorer
     40 Microsoft SQL Server Management Studio Express
     41 KINGSTON (F:)
     42 Program Manager

Variables in use
================
   Procedure     Type   Value
   ==========================
   (b)FCONSULTA
     Param   1:    O    Class: TDIALOG
     Local   1:    S    
     Local   2:    A    Len:    3
     Local   3:    N    4
     Local   4:    U    
     Local   5:    N    0
   TDIALOG:INITIATE
     Param   1:    N    132822
     Param   2:    N    132826
     Local   1:    O    Class: TDIALOG
     Local   2:    L    .T.
     Local   3:    U    
     Local   4:    U    
     Local   5:    L    .F.
     Local   6:    U    
   TDIALOG:HANDLEEVENT
     Param   1:    N    272
     Param   2:    N    132822
     Param   3:    N    132826
     Local   1:    O    Class: TDIALOG
   DIALOGBOX
     Param   1:    N    4194304
     Param   2:    C    "CONSUL_XBR"
     Param   3:    N    591012
     Param   4:    O    Class: TDIALOG
   TDIALOG:ACTIVATE
     Param   1:    U    
     Param   2:    U    
     Param   3:    U    
     Param   4:    L    .F.
     Param   5:    U    
     Param   6:    L    .T.
     Param   7:    B    {|| ... }
     Param   8:    U    
     Param   9:    U    
     Param  10:    L    .F.
     Local   1:    O    Class: TDIALOG
     Local   2:    N    591012
     Local   3:    U    
     Local   4:    U    
     Local   5:    S    
     Local   6:    O    Class: TDIALOG
   FCONSULTA
     Param   1:    O    Class: TDIALOG
     Param   2:    O    Class: TOLEAUTO
     Param   3:    O    Class: TOLEAUTO
     Local   1:    O    Class: TOLEAUTO
     Local   2:    O    Class: TXBROWSE
     Local   3:    C    "SELECT parcela, nombre, apellidos FROM datos_personales"
     Local   4:    O    Class: TCHECKBOX
     Local   5:    O    Class: TCOMBOBOX
     Local   6:    C    "Todos"
     Local   7:    L    .F.
     Local   8:    O    Class: TGET
     Local   9:    C    "                              "
     Local  10:    O    Class: TGET
     Local  11:    C    "                                                  "
     Local  12:    O    Class: TGET
     Local  13:    C    "                                                                                                    "
     Local  14:    O    Class: TGET
     Local  15:    C    "         "
     Local  16:    O    Class: TGET
     Local  17:    C    "         "
     Local  18:    O    Class: TGET
     Local  19:    C    "         "
     Local  20:    O    Class: TGET
     Local  21:    C    "         "
   (b)FOPENCONSULTAS
     Param   1:    O    Class: TBTNBMP
   TBTNBMP:CLICK
     Local   1:    O    Class: TBTNBMP
   TBTNBMP:LBUTTONUP
     Param   1:    N    7
     Param   2:    N    60
     Local   1:    O    Class: TBTNBMP
     Local   2:    U    
     Local   3:    L    .T.
   TWINDOW:HANDLEEVENT
     Param   1:    N    514
     Param   2:    N    0
     Param   3:    N    458812
   TCONTROL:HANDLEEVENT
     Param   1:    N    514
     Param   2:    N    0
     Param   3:    N    458812
     Local   1:    O    Class: TBTNBMP
     Local   2:    U    
   TBTNBMP:HANDLEEVENT
     Param   1:    N    514
     Param   2:    N    0
     Param   3:    N    458812
     Local   1:    O    Class: TBTNBMP
   _FWH
     Param   1:    N    458812
     Param   2:    N    514
     Param   3:    N    0
     Param   4:    N    458812
     Param   5:    N    274
     Local   1:    O    Class: TBTNBMP
   WINRUN
     Param   1:    N    591012
   TMDIFRAME:ACTIVATE
     Param   1:    C    "MAXIMIZED"
     Param   2:    U    
     Param   3:    U    
     Param   4:    U    
     Param   5:    U    
     Param   6:    B    {|| ... }
     Param   7:    U    
     Param   8:    U    
     Param   9:    U    
     Param  10:    U    
     Param  11:    U    
     Param  12:    U    
     Param  13:    U    
     Param  14:    U    
     Param  15:    U    
     Param  16:    U    
     Param  17:    U    
     Param  18:    U    
     Param  19:    U    
     Local   1:    O    Class: TMDIFRAME
     Local   2:    U    
     Local   3:    U    
   MAIN
     Local   1:    O    Class: TMDIFRAME
     Local   2:    O    Class: TICON
     Local   3:    U    
     Local   4:    U    
     Local   5:    O    Class: TBAR
     Local   6:    O    Class: TFONT
     Local   7:    O    Class: TBRUSH
     Local   8:    O    Class: TBITMAP
     Local   9:    O    Class: TBTNBMP
     Local  10:    O    Class: TBTNBMP
     Local  11:    O    Class: TBTNBMP
     Local  12:    O    Class: TBTNBMP
     Local  13:    O    Class: TBTNBMP
     Local  14:    O    Class: TBTNBMP
     Local  15:    O    Class: TBTNBMP
     Local  16:    O    Class: TBTNBMP
     Local  17:    O    Class: TBTNBMP
     Local  18:    U    
     Local  19:    U    
     Local  20:    C    "                                                  "
     Local  21:    N    384.00
     Local  22:    N    279.00

Linked RDDs
===========
   DBF
   DBFFPT
   DBFBLOB
   DBFNTX

DataBases in use
================

Classes in use:
===============
     1 ERROR
     2 HBCLASS
     3 TOLEAUTO
     4 HBOBJECT
     5 TWINDOW
     6 TCONTROL
     7 TGET
     8 TFONT
     9 TICON
    10 TBRUSH
    11 TMDIFRAME
    12 TMENU
    13 TMENUITEM
    14 TMDICLIENT
    15 TBAR
    16 TRECT
    17 TBTNBMP
    18 TMSGBAR
    19 TBITMAP
    20 TDIALOG
    21 TMDICHILD
    22 TTABS
    23 TSAY
    24 GET
    25 TCLIPGET
    26 TCHECKBOX
    27 TCOMBOBOX
    28 TXBROWSE
    29 TSCROLLBAR
    30 TXBRWCOLUMN
    31 TREG32

Memory Analysis
===============
      364 Static variables

   Dynamic memory consume:
      Actual  Value:          0 bytes
      Highest Value:          0 bytes

Javier,

FWH 8.04 2008

Continue the discussion

Static archive 路 New replies & topics via GitHub Discussions