Search found 156 matches: implementando

Return to advanced search

Re: Implementando una Clase TExplorerBar propia de FWH

El enlace al video no me funciona
by cnavarro
Sat May 16, 2020 11:53 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Implementando una Clase TExplorerBar propia de FWH
Replies: 57
Views: 9331

Re: Implementando una Clase TExplorerBar propia de FWH

En mi anterior post hay un video con el efecto erróneo.
Ahora subo uno como ha quedado. Solo hay que anular esas dos líneas.

https://vimeo.com/419249741
by pacotre
Sat May 16, 2020 10:37 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Implementando una Clase TExplorerBar propia de FWH
Replies: 57
Views: 9331

Re: Implementando una Clase TExplorerBar propia de FWH

Paco,

muy bien

Puedes proporcionar un ejemplo completo para que otros usarios puedan usarlo ?

muchas gracias
by Antonio Linares
Sat May 16, 2020 10:28 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Implementando una Clase TExplorerBar propia de FWH
Replies: 57
Views: 9331

Re: Implementando una Clase TExplorerBar propia de FWH

Buenos dias: Pues he dado una solución a este problema. No sé si es la más ortodoxa, pero a mi me vale: ::oVScroll:bGoUp = {|| ::VScrollSkip( - 10 ) } ::oVScroll:bGoDown = {|| ::VScrollSkip( 10 ) } // ::oVScroll:bPageUp = {|| ::VScrollSkip( - ::oVScroll:nPgStep ) } // ::oVScroll:bPageDown = {|| ::VS...
by pacotre
Sat May 16, 2020 10:15 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Implementando una Clase TExplorerBar propia de FWH
Replies: 57
Views: 9331

Re: Implementando una Clase TExplorerBar propia de FWH

Hola amigos: Tengo un pequeño problemilla con Texplorer. En general me va muy bien, pero he observado un problema que no sé por donde meterle mano. Se trata de Scroll Vertical. Si muevo la barra de Scroll, sin problemas. Si pincho abajo, fuera de la barra, se desplaza todo y sin problemas, moviendo ...
by pacotre
Fri May 15, 2020 12:26 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Implementando una Clase TExplorerBar propia de FWH
Replies: 57
Views: 9331

Re: Implementando una Clase TExplorerBar propia de FWH

Buenos dias Antonio: He encontrado la forma más práctica de resolverlo y me ha quedado muy bien. Consiste solo en meterle espacios por la izquierda a los bitmaps: oPanel1 = oExBar:AddPanel( "Informes", "CASE" ) El bitmap "CASE" por ejemplo lo he desplazado a la derecha,...
by pacotre
Fri Apr 17, 2020 9:23 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Implementando una Clase TExplorerBar propia de FWH
Replies: 57
Views: 9331

Re: Implementando una Clase TExplorerBar propia de FWH

Paco,

Ese PRG no está completo y no se puede compilar tal cual está.

Para poder dar soporte técnico, necesitamos que nos ayudeis de esa forma :-)
by Antonio Linares
Thu Apr 16, 2020 7:44 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Implementando una Clase TExplorerBar propia de FWH
Replies: 57
Views: 9331

Re: Implementando una Clase TExplorerBar propia de FWH

Puedes proporcionar un PRG ejemplo pequeño y autocontenido de como lo estás haciendo ? oExBar:nTopColor := FONDODIAL2 oExBar:nBottomColor :=FONDODIAL2 oPanel1 = oExBar:AddPanel( "Informes", "MALETIN" ) opanel1:SetColor(letras,fondo) oPanel1:AddLink("Vistas_I",bClick, )...
by pacotre
Wed Apr 15, 2020 10:20 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Implementando una Clase TExplorerBar propia de FWH
Replies: 57
Views: 9331

Re: Implementando una Clase TExplorerBar propia de FWH

Cristobal, gracias por responder.
Supongo que te funcionó lo de ajustar el primer panel al top del TExplorerBar, no?

Si funciono super :D
Quieres decir que tienes más paneles de los que caben en el TExplorerBar y quieres actuar sobre el scroll con el ratón?

Exactamente
by leandro
Wed Apr 15, 2020 7:17 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Implementando una Clase TExplorerBar propia de FWH
Replies: 57
Views: 9331

Re: Implementando una Clase TExplorerBar propia de FWH

leandro wrote:Tengo otra petición :D

Que la rueda del ratón también desplace el panel.


Supongo que te funcionó lo de ajustar el primer panel al top del TExplorerBar, no?

Quieres decir que tienes más paneles de los que caben en el TExplorerBar y quieres actuar sobre el scroll con el ratón?
by cnavarro
Wed Apr 15, 2020 4:31 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Implementando una Clase TExplorerBar propia de FWH
Replies: 57
Views: 9331

Re: Implementando una Clase TExplorerBar propia de FWH

Tengo otra petición :D

Que la rueda del ratón también desplace el panel.
by leandro
Wed Apr 15, 2020 2:22 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Implementando una Clase TExplorerBar propia de FWH
Replies: 57
Views: 9331

Re: Implementando una Clase TExplorerBar propia de FWH

Puedes proporcionar un PRG ejemplo pequeño y autocontenido de como lo estás haciendo ?

gracias
by Antonio Linares
Wed Apr 15, 2020 2:13 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Implementando una Clase TExplorerBar propia de FWH
Replies: 57
Views: 9331

Re: Implementando una Clase TExplorerBar propia de FWH

Buenos dias Antonio: He añadido el nuevo Method en la Clase Texplorer y funciona correctamente, pero tiene un par de fallitos que no consigo arreglar. He intentado modificar el margen izquierdo, pero no lo consigo. El problema consiste en que al abrir cerrados, la pantalla que limpia es más corta po...
by pacotre
Wed Apr 15, 2020 7:01 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Implementando una Clase TExplorerBar propia de FWH
Replies: 57
Views: 9331

Re: Implementando una Clase TExplorerBar propia de FWH

Leandro, en el caso del primero, tienes que definirlo inmediatamente después de definir el primer panel, y antes de definir el segundo
Code: Select all  Expand view

   oPanel1:nTop -= 10
 
by cnavarro
Wed Apr 15, 2020 12:32 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Implementando una Clase TExplorerBar propia de FWH
Replies: 57
Views: 9331
PreviousNext

Return to advanced search