Page 1 of 1
Explorer Bar de Andres Reyes
Posted: Wed Sep 05, 2018 10:09 pm
by hmpaquito
Hola,
Estoy buscando la ultima version de la clase Explorer Bar de Andres Reyes, que creo que venía suministrada en formato .lib.
Realmente lo que necesito es una clase explorer bar que tenga scroll que funcione correctamente.
Alguien me apuntaría, por favor, un link.
Saludos.
Re: Explorer Bar de Andres Reyes
Posted: Thu Sep 06, 2018 5:43 am
by Antonio Linares
Paco,
Has probado la que proporciona FWH ?
Le falla la barra de scroll ? Puedes proporcionar un ejemplo ?
gracias
Re: Explorer Bar de Andres Reyes
Posted: Thu Sep 06, 2018 7:29 am
by hmpaquito
Buenos días Antonio,
.\samples\explbar4.prg es un ejemplo de que falla el scrollbar
Saludos
Re: Explorer Bar de Andres Reyes
Posted: Thu Sep 06, 2018 10:44 am
by Antonio Linares
Paco,
Que es lo que falla en ese ejemplo ?
Observa que siempre se muestra hasta diciembre que es el final de cada grupo
Re: Explorer Bar de Andres Reyes
Posted: Thu Sep 06, 2018 10:49 am
by Antonio Linares
Si quieres que se muestre un poco del control más abajo del grupo modifica esta línea en:
METHOD CheckScroll() CLASS TExplorerBar
...
nLastRow = ::nVirtualTop + oLastItem:nTop + ;
If( ! oLastItem:lCollapsed, oLastItem:nTotalHeight,;
oLastItem:nTitleHeight ) + 10 // añadimos 10 pixeles
Re: Explorer Bar de Andres Reyes
Posted: Thu Sep 06, 2018 10:55 am
by hmpaquito
Antonio,
Lo que falla es esto:
Code: Select all
::oVScroll:bPageUp = {|| ::VScrollSkip( - ::oVScroll:nPgStep ) }
::oVScroll:bPageDown = {|| ::VScrollSkip( ::oVScroll:nPgStep ) }
Que con un workaround lo he solucionado con esto:
Code: Select all
::oVScroll:bPageUp = {|| ::VScrollSkip( -10) }
::oVScroll:bPageDown = {|| ::VScrollSkip( 10 ) }
El problema es que al ejecutarse hacia que los paneles se perdieran de vista y definitivamente se perdieran.
Saludos
Re: Explorer Bar de Andres Reyes
Posted: Thu Sep 06, 2018 11:18 am
by Antonio Linares
Paco,
Y en ese ejemplo como consigues que se pierdan los paneles ?
Aqui parece funcionar bien
Re: Explorer Bar de Andres Reyes
Posted: Thu Sep 06, 2018 11:31 am
by hmpaquito
No arrastres el thumb, sino que pincha en el track del scroll para que se ejecuten esos dos codeblocks que he parcheado. Eso hace desaparecer los panels y finalmente, después de varios pinchazos, no queda ni uno visible.