FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour xBrowse y array vacio
Posts: 1364
Joined: Wed Jun 21, 2006 12:39 AM

xBrowse y array vacio

Posted: Mon Aug 05, 2013 07:39 PM

He notado que si un control xBrowse muestra un array vacio los métodos del ratón no funcionan. Hay alguna manera que estos se ejecuten ?, Mis herramientas son fwh 12.04, harbour y Bcc. Gracias.

Posts: 1364
Joined: Wed Jun 21, 2006 12:39 AM

Re: xBrowse y array vacio

Posted: Wed Aug 07, 2013 05:23 PM

+1

Posts: 1144
Joined: Mon Feb 05, 2007 07:15 PM

Re: xBrowse y array vacio

Posted: Wed Aug 07, 2013 05:58 PM

y si proporcionas un ejemplo, para poder hacer una prueba?
saludos..

Cesar Cortes Cruz

SysCtrl Software

Mexico



' Sin +- FWH es mejor "
Posts: 1364
Joined: Wed Jun 21, 2006 12:39 AM

Re: xBrowse y array vacio

Posted: Wed Aug 07, 2013 07:49 PM
Gracias por contestar, aqui el ejemplo

Code (fw): Select all Collapse
#include 'fivewin.ch'
#include 'xbrowse.ch'

Function Main()

    Local oDlg
    Local oBrw
    Local aDatos := {}
    
    Define Dialog oDlg From 100, 100 To 300, 300 Pixel
    
        @ 0, 0 xBrowse oBrw Array aDatos Size 100, 100 Pixel Of oDlg    
        With Object oBrw
            :bLDblClick := { || MsgAlert( 'mensaje 1' ) }
            :bRClicked  := { || MsgAlert( 'mensaje 2' ) }
            :CreateFromCode()
        End 
    
    Activate Dialog oDlg 
    Return 0


Saludos
Posts: 2170
Joined: Fri Jul 18, 2008 01:24 AM

Re: xBrowse y array vacio

Posted: Thu Aug 08, 2013 02:31 AM
Horacio,

bLDClickData,; // codeblock to be evaluated when left double clicking on the data
bRClickData // codeblock to be evaluated when right clicking on the data

Yo entiendo que si no hay data (ningun item en el browse), no se evalua.

Saludos.
Francisco J. Alegría P.

Chinandega, Nicaragua.



Fwxh-MySql-TMySql
Posts: 6755
Joined: Wed Feb 15, 2012 08:25 PM

Re: xBrowse y array vacio

Posted: Thu Aug 08, 2013 06:34 AM
FranciscoA wrote:Horacio,

Yo entiendo que si no hay data (ningun item en el browse), no se evalua.

Saludos.


Francisco,
Yo creo que no ha de ser asi
Los eventos y mensajes de un control han de funcionar independientemente de su contenido
Saludos
Cristobal Navarro

Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo

El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
Posts: 1364
Joined: Wed Jun 21, 2006 12:39 AM

Re: xBrowse y array vacio

Posted: Thu Aug 08, 2013 11:21 AM

Gracias Francisco y Cristóbal por respoder, estoy de acuerdo con Cristóbal. El control debe poder ejecutar sus métodos independientemente de los datos. En mi caso los uso para llamar a una tabla con datos para llenar esta última y también un menú contextual. Sin embargo los métodos del teclado funcionan aún sin datos. Hay alguna manera de activar los métodos del ratón ? Muchísimas gracias.

Saludos

Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM

Re: xBrowse y array vacio

Posted: Sun Aug 11, 2013 05:09 PM

Only way is to modify xbrowse.prg .
Methods RButtonDown, LButtonUp and LDblClick.
At the end of these methods forward the call to Super:
example
return Super:RButtonDown( nRow, nCol, nKeyFlags )

Regards



G. N. Rao.

Hyderabad, India

Continue the discussion