Error en wBrowse

[Manuel Valdenebro]

Tengo un diálogo con un listbox (xBrowse) que funciona sin problemas. Pero si tengo minimizada una página web (por ejemplo la página de este foro) y abro/cierro varias veces la página web, me ocurre lo siguiente:

1ª) Nada en la primera vez (abro/cierro)
2ª) En la segunda, me borra los datos del registro activo.
3ª) Se va el listbox al ultimo registro que es el único que aparece en pantalla.

Si con la barra scroll subo el listbox hacia arriba, me aparece un ultimo registro en blanco.

Lo mismo ocurre, si al pulsar un botón en el diálogo aparece una VENTANA mas ancha que el diálogo original.

¿Cual puede ser el problema?

Muchas gracias

[Antonio Linares]

Manuel,

Es un wBrowse (como indicas en el titulo del post) ó un xbrowse ?

[Manuel Valdenebro]

Manuel,

Es un wBrowse (como indicas en el titulo del post) ó un xbrowse ?

Antonio,

Es el clásico Listbox wbrowse.


DEFINE DIALOG oDlg RESOURCE "dInqui" TITLE " " + cTit1

REDEFINE LISTBOX oLbx FIELDS ;
IF((cOpcion)->ACTIVO, ;
aHBitmaps[ Max( 1, 1 )], ;
aHBitmaps[ Max( 1, 2 )]), ;
(cOpcion)->NOMBRE, ;
(cOpcion)->TFNO ;
HEADERS " ", ;
cM[9], ;
cM[10] ;
FIELDSIZES 13*nRancho, 280*nRancho, 300*nRancho ;
ID 110 OF oDlg ;
ALIAS IF (cOpcion=="empresas", "empresas", "empleado") ;
ON DBLCLICK A_agencia ("Modificar", oLbx, cTitu, cOpcion)

oLbx:aJustify ={.f.,.f.,.f.}
oLbx:nClrPane:={|| IIF((oLbx:cAlias)->(OrdKeyNo())%2==0, CELE, GRIS)}
oLbx:nClrForeHead := AZUL

[Antonio Linares]

Manuel,

Puedes construir FWH\samples\fwbrow.prg y con el browse con bitmaps que tiene, intentar reproducir el problema ?

Aqui lo hemos intentado, pero funciona bien

[Manuel Valdenebro]

Antonio,

La causa del problema no estaba en el Listbox o los bitmaps, sino en un SET RELATION.

La tabla tiene un indice CDX con dos ordenes y un SET RELATION por uno de ellos. Para solucionar el problema,
al entrar en el módulo del ListBox, he tenido que anular el SET RELATION (set rela to) y volverlo a
activar al salir del módulo.

Muchas gracias de nuevo.

[Antonio Linares]

Manuel,

Me alegro de que lo hayas solucionado