Pintado de browse

[JoseLuis]

Buenas

No se si será normal, pero los xbrowse en xharbour que aparte de que son mucho mas lentos que en twbrowse, hacen una cosa rara al abrirse, como si pintara algo debajo, dejo un video

Con xbrowse:

wbrowse1

Con twbrowse:

twbrowse1

Las bases de datos no estan con ningun filtro

Un saludo

[cmsoft]

Lo primero que se te pinta es la ventana contenedora del xbrowse. Luego seguramente la ajustas al al xbrowse no?

[JoseLuis]

Buenos dias

Hago lo mismo en xbrowse y en twbrowse:

Code: Select all

 DEFINE WINDOW oDlg MDICHILD;
    OF Publicas:oWPpal;
    COLOR CLR_BLACK,CLR_WHITE;
        PIXEL

  oDlg:cTitle:=cTitulo

  DEFINE BUTTONBAR oBar 2010 OF oDlg

  DEFINE BUTTON RESOURCE "ANADIR"   OF oBar NOBORDER MESSAGE "Añadir"      ACTION (cTitulo:="Creación de nuevos Albaranes ",;
                        (aAlias[24])->(OrdSetFocus("Albaran")),oTab:nOption:=1,oTab:refresh(),;
                        Entalba(cTitulo,"A",,aAlias),oLbx:Refresh());
                        WHEN Publicas:cAccesoT  TOOLTIP "Añadir"
.............................. etc

 cAlias:=aAlias[24]

    @ 30, 0  XBROWSE oLbx OF oDlg;
    ALIAS cAlias AUTOSORT LINES CELL;
 .............................. etc

            ACTIVATE WINDOW oDlg ;
        MAXIMIZED;
                VALID ((aAlias[21])->( dbClosearea() ),(aAlias[22])-> ( dbClosearea() ),;

.............................. etc
 

Osea, creo la ventana contenedora, luego creo xbrowse y por ultimo activo la venta maximizada.
Y si tengo bastantes registros, tarda más en pintarme el browse.

Lo que me refiero es que aparte de que con el mismo código en xbrows y en twbrowse, va infinitamente más rápido en twbrowse que xbrowse por un lado.
Y por otro lado en xbrowse, van apareciendo una serie de cosas hasta que se queda la imagen fija, cosa que no ocurre con twbrowse,

Es normal?