FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour ERROR EN XBROWSE NO FUNCIONA DOBLE CLICK
Posts: 1054
Joined: Sun Oct 09, 2005 10:41 PM
ERROR EN XBROWSE NO FUNCIONA DOBLE CLICK
Posted: Mon Apr 24, 2023 02:17 AM
HOla Amigos,,,
Utilizao el PellesC para los recursor,,, utilizo el xbrowse, perro al hace un doble click en la última fila que este al final del control, no funciona-
[url=https://imgbb.com/][/ur
Posts: 3358
Joined: Fri Oct 07, 2005 08:20 PM
Re: ERROR EN XBROWSE NO FUNCIONA DOBLE CLICK
Posted: Tue Apr 25, 2023 01:56 AM

Mister:

Aquí no me da problema, funciona bien.

Saludos

SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
Posts: 851
Joined: Sun Nov 09, 2014 05:01 PM
Re: ERROR EN XBROWSE NO FUNCIONA DOBLE CLICK
Posted: Tue Apr 25, 2023 02:39 AM

Trata dejando un poco mas separada la ultima linea del borde de la caja.

"Los errores en programación, siempre están entre la silla y el teclado..."



Fwh 19.06 32 bits + Harbour 3.2 + Borland 7.4 + MariaDB + TDolphin



Carora, Estado Lara, Venezuela.
Posts: 1054
Joined: Sun Oct 09, 2005 10:41 PM
Re: ERROR EN XBROWSE NO FUNCIONA DOBLE CLICK
Posted: Tue Apr 25, 2023 02:27 PM

HOla amigos,

Deje un poco mas de espacio entre el xbrowse y el control, funciona, pero no se ve bien (el espacio), algun pequeño ajustes talvez...

Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Re: ERROR EN XBROWSE NO FUNCIONA DOBLE CLICK
Posted: Tue Apr 25, 2023 03:10 PM

Willi, código?

Gracias.

Regards, saludos.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Posts: 1054
Joined: Sun Oct 09, 2005 10:41 PM
Re: ERROR EN XBROWSE NO FUNCIONA DOBLE CLICK
Posted: Tue Apr 25, 2023 03:27 PM
El codigo:
Code (fw): Select all Collapse
       REDEFINE XBROWSE oBrw ;
                DATASOURCE oResVen;    ///                AUTOCOLS ;                AUTOSORT LINES ;
                FASTEDIT LINES ;
                FONT oApp:oFontBrw1 ;   //                          ON CHANGE (oApp:cSeek := "", EVAL(eCodigo), RRefresh(oProd) ) ; //, EVAL(eImg) ) ;
                ID 100 OF oDlg

                oCol := oBrw:AddCol()
                oCol:bStrData      := { || oResVen:RecNo() }         // num correlativo
                oCol:cHeader       := "#"
                oCol:bClrStd       := { || { CLR_GREEN, CLR_WHITE } }
                oCol:nDataStrAlign := AL_LEFT
                oCol:nWidth        := 25

                oCol := oBrw:AddCol()
                oCol:bStrData      := { || oResVen:fecha_doc }
                oCol:cHeader       := "Fecha"
                oCol:bClrStd       := { || { CLR_BLUE, CLR_WHITE } }
                oCol:nDataStrAlign := AL_LEFT
                oCol:nWidth        := 85
....
...
..
.
                oBrw:nMarqueeStyle       := 5 //MARQSTYLE_HIGHLCELL
                oBrw:lAllowRowSizing     := .F.
                oBrw:ltransparent        := .F.
                oBrw:nheaderHeight       := 18 // altura de la cabecera HEADER
                oBrw:nRowHeight          := 20  // altura del prompt
                oBrw:lVScroll            := .t.
                oBrw:lHScroll            := ( .t. )
                oBrw:lRecordSelector     := .F.
                oBrw:lAllowColSwapping   := .F.
                oBrw:lAllowColHiding     := .f.
                oBrw:lColDividerComplete := .t.
                oBrw:nRowDividerStyle    := 4
                oBrw:nStretchCol         := STRETCHCOL_LAST
                oBrw:nColDividerStyle    := 4
                oBrw:l2007               := .t.
                oBrw:lColDividerComplete := .t.
                oBrw:lAdjusted           := .f.
                oBrw:nFreeze             := 6
                oBrw:bClrSel             := { || { ColorClrSel(oResVen), oApp:aGradBarSelFocus } }  // para barra de linea selecc cuando el control no tiene el foco
                oBrw:bClrSelFocus        := { || { ColorClrSel(oResVen), oApp:aGradBarSelFocus } }     // para barra de linea selecc cuando el control tiene el foco
                oBrw:lKinetic            := .f. //oWndSfs:SetFocus(),
                oBrw:bLDblClick          := {|| VerDocumento(oCn, 2, oResVen:tipo, oResVen:documento, oResVen:cod_prov_clie, oResVen:cliente, oResVen:direccion), oBrw:SetFocus() }
Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Re: ERROR EN XBROWSE NO FUNCIONA DOBLE CLICK
Posted: Tue Apr 25, 2023 03:58 PM
Willi, intenta si:
Code (fw): Select all Collapse
   REDEFINE XBROWSE oBrw  ;
      DATASOURCE oResVen  ;
      FASTEDIT LINES      ;
      FONT oApp:oFontBrw1 ;
      ID 100 OF oDlg      ;
      ON DBLCLICK ( VerDocumento(oCn, 2, oResVen:tipo, oResVen:documento, oResVen:cod_prov_clie, oResVen:cliente, oResVen:direccion ), oBrw:Refresh() )
Regards, saludos.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Posts: 1054
Joined: Sun Oct 09, 2005 10:41 PM
Re: ERROR EN XBROWSE NO FUNCIONA DOBLE CLICK
Posted: Wed Apr 26, 2023 03:17 AM

Estimado Karinha

Igual, no funciona..

Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Re: ERROR EN XBROWSE NO FUNCIONA DOBLE CLICK
Posted: Wed Apr 26, 2023 10:33 AM

Willi, cual és tú versión de FWH? mejor hablar con master Rao.

Saludos.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Posts: 851
Joined: Sun Nov 09, 2014 05:01 PM
Re: ERROR EN XBROWSE NO FUNCIONA DOBLE CLICK
Posted: Wed Apr 26, 2023 10:58 AM

Estimado willi, pienso que el problema es con PELLES

Que control usas para ver el xBrowse?

Listbox o un control personalizado (custom) ??

"Los errores en programación, siempre están entre la silla y el teclado..."



Fwh 19.06 32 bits + Harbour 3.2 + Borland 7.4 + MariaDB + TDolphin



Carora, Estado Lara, Venezuela.
Posts: 1054
Joined: Sun Oct 09, 2005 10:41 PM
Re: ERROR EN XBROWSE NO FUNCIONA DOBLE CLICK
Posted: Wed Apr 26, 2023 02:23 PM

MI estimado, como estas...

Utilizao el PellesC, y un control custom... Windows Style 0x50A00000.

Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Re: ERROR EN XBROWSE NO FUNCIONA DOBLE CLICK
Posted: Wed Apr 26, 2023 02:37 PM
Willi, Intenta con:
Code (fw): Select all Collapse
 0x50E10000 

 0x50210000

 0X50C10000

 0x50D00000 //-> Barra Horizontal

 0x50A00000 //-> Barra Vertical

 0x50B00000 //-> Barra Horizontal e Vertical

Class name: TXBrowse
Regards, saludos.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Posts: 1054
Joined: Sun Oct 09, 2005 10:41 PM
Re: ERROR EN XBROWSE NO FUNCIONA DOBLE CLICK
Posted: Wed Apr 26, 2023 03:00 PM
Mis amigos gracias,,, prove con todo lo señalado y no funciona correctamente.... pero descubrí algo, vean la imagen
Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Re: ERROR EN XBROWSE NO FUNCIONA DOBLE CLICK
Posted: Wed Apr 26, 2023 03:23 PM

Post el .RC de donde está esta XBROWSE(), porfa.

Regards, saludos.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Posts: 389
Joined: Wed Nov 29, 2006 01:51 PM
Re: ERROR EN XBROWSE NO FUNCIONA DOBLE CLICK
Posted: Wed Apr 26, 2023 04:14 PM

buenas,

si mal no recuerdo, es o era (tal vez ya se corrigio) un error de vieja data del xbrowse, no recuerdo si se corrigio en las ultimas versiones.

Saludos