Page 1 of 1

Pintado de browse

Posted: Tue May 14, 2019 7:08 pm
by 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:

Imagewbrowse1

Con twbrowse:

Imagetwbrowse1

Las bases de datos no estan con ningun filtro

Un saludo

Re: Pintado de browse

Posted: Tue May 14, 2019 10:28 pm
by cmsoft
Lo primero que se te pinta es la ventana contenedora del xbrowse. Luego seguramente la ajustas al al xbrowse no?

Re: Pintado de browse

Posted: Wed May 15, 2019 4:37 pm
by 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?