FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour repintado de xbrowse detalle
Posts: 132
Joined: Sun Oct 23, 2005 04:09 PM
repintado de xbrowse detalle
Posted: Fri Jul 17, 2009 05:23 PM

hola a todos
tengo algo peculiar, tengo 2 oBrw el primero maestro y el 2do detalle , en bchange del primero scopeo el detalle, pero el alcunas ocaciones de 3 registros del detalle solo muestra 2 cuando son 3, o 4 de 5, etc.si navego con el teclado, pero si navego con el raton (dando click en el browse del maestro) si muestra el detalle completo ....!!! ¿?

Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
Re: repintado de xbrowse detalle
Posted: Fri Aug 14, 2009 01:15 PM

Que código usas en el ON CHANGE del xbrowse maestro ?

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 132
Joined: Sun Oct 23, 2005 04:09 PM
Re: repintado de xbrowse detalle
Posted: Mon Aug 17, 2009 06:08 PM

hola maestro

oBrwCli:bChange:={|| (factura->(quickscope(empresa->clave+cliente->clave)),;
nSumaFacturas := 0,;
oBrw2:gotop(),;
oBrw2:refresh(),;
oDlg:UpDate() )}

saludos

Posts: 610
Joined: Wed Oct 19, 2005 08:20 PM
Re: repintado de xbrowse detalle
Posted: Mon Aug 17, 2009 09:08 PM
Yo lo hago así y funciona perfectamente:
Code (fw): Select all Collapse
oBrwCli:bChange:={|| Actualiza()}

********************************
Static Function Actualiza()
********************************
factura->(ordscope(TOPSCOPE, empresa->clave+cliente->clave))
factura->(ordscope(BOTTOMSCOPE, empresa->clave+cliente->clave))
factura->(DbGoTop())
oBrw2:GoTop()
oBrw2:refresh()
RETURN nil
Un saludo,

Manuel



xH 1.2.3, FWH 23.07 32 bits, BC++ 7.4, xVerce CW 1.0, PellesC
Posts: 132
Joined: Sun Oct 23, 2005 04:09 PM
Re: repintado de xbrowse detalle
Posted: Mon Aug 17, 2009 11:13 PM

gracias por tu respuesta Manuel, pero sigue igual....¿?

Posts: 610
Joined: Wed Oct 19, 2005 08:20 PM
Re: repintado de xbrowse detalle
Posted: Tue Aug 18, 2009 03:56 PM

Hola de nuevo Miguel:

Creo recordar haber tenido un problema parececido y que había que seleccionar previamente el area de trabajo antes de pintar el browse (aunque en mi caso lo hago con listbox). Algo así como esto.

DbSelectArea("Clientes")
Redefine ListBox .......
.............................
DbSelectArea("Detalle1")
Redefine ListBox .......
...........................
DbSelectArea("Detalle2")
Redefine ListBox .......
............................
y por último después de pintados los browses volvemos el area al maestro.
DbSelectArea("Clientes")

Un saludo,

Manuel



xH 1.2.3, FWH 23.07 32 bits, BC++ 7.4, xVerce CW 1.0, PellesC
Posts: 132
Joined: Sun Oct 23, 2005 04:09 PM
Re: repintado de xbrowse detalle
Posted: Wed Aug 19, 2009 04:51 PM

Gracias por tu tiempo Manuel Tomando en cuenta lo que me comentas hice lo sigte:

oBrwCli:bChange:={|| factura->(actualiza(@oBrw2))}

en lugar de:

oBrwCli:bChange:={|| actualiza(@oBrw2)}

y problema resuelto!!!!

Gracias de nuevo

atte Miguel Salas

Continue the discussion