FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexAll discussionsLogin (GitHub)
Board index FiveWin para Harbour/xHarbour HScroll y VSroll con tsBrowse
noe aburto
Posts: 418
Joined: Wed Nov 26, 2008 06:33 PM
HScroll y VSroll con tsBrowse
Posted: Wed Aug 21, 2013 10:19 PM

vaya con esto de las actualizaciones de fwh.

Con la version de tsbrowse 9.0 y fwh 8.11, xH 11, bcc55 no habia problema con la clase tsBrowse 9.0 (M. Mercado)
Todas mis libs sin ningun problema. Ahora con fwh 13.07 recompile mis prog's. y ya no me trabaja los sroll V y H.

la definicion de las barras en ambas de scroll estan de acuerdo al fwh:

::oVScroll := TScrollBar():WinNew( nMin, nMax, nPage, .T., Self )
::oHScroll := TScrollBar():WinNew( nMin, nMax, , .F., Self )

Alguien que haya resuelto este detalle?

Noé Aburto Sánchez
Tec. Prog. de Sistemas. -Morelia, Mich. México.
fwh 20.06, Harbour 3.2.0, bcc 7.4
TsBrowse 9.0, TsButton 7.0, xEdit 6.1
naburtos@gmail.com, noeaburto67@hotmail.com
carlos vargas
Posts: 1789
Joined: Tue Oct 11, 2005 05:01 PM
Re: HScroll y VSroll con tsBrowse
Posted: Fri Aug 23, 2013 03:04 AM

Noé, usas tsbrowse desde recursos?

salu2
carlos Vargas

Salu2

Carlos Vargas

Desde Managua, Nicaragua (CA)
noe aburto
Posts: 418
Joined: Wed Nov 26, 2008 06:33 PM
Re: HScroll y VSroll con tsBrowse
Posted: Fri Aug 23, 2013 04:01 AM

No, es directo en codigo.
Que diferencia existe entre recursos y codigo, se suponde que debe funcionar igual.
Que version estas usando de tsbrowse?

Noé Aburto Sánchez
Tec. Prog. de Sistemas. -Morelia, Mich. México.
fwh 20.06, Harbour 3.2.0, bcc 7.4
TsBrowse 9.0, TsButton 7.0, xEdit 6.1
naburtos@gmail.com, noeaburto67@hotmail.com
carlos vargas
Posts: 1789
Joined: Tue Oct 11, 2005 05:01 PM
Re: HScroll y VSroll con tsBrowse
Posted: Fri Aug 23, 2013 04:10 AM
estoy revisando el código de tsbrowse y veo que hay que hacer cambios en el código c
hay muchos parámetros que deben ser hb_parnl y se esta usando hb_parni.

además no esta usando hscroll y vscroll, en el caso de resourcfed hay que definirlo en los style

Code (fw): Select all Collapse
DIALOG_1 DIALOG 9, 30, 387, 271
STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_DLGFRAME
FONT 8, "MS Sans Serif"
{
 CONTROL "", 110, "TSBrowse", 0 | WS_CHILD | WS_VISIBLE | WS_BORDER | WS_TABSTOP[b] | WS_HSCROLL | WS_VSCROLL[/b] , 7, 7, 369, 219
 PUSHBUTTON "OK", 210, 144, 235, 50, 14
}

cuando termine de revisar el código lo pongo aca
Salu2

Carlos Vargas

Desde Managua, Nicaragua (CA)
carlos vargas
Posts: 1789
Joined: Tue Oct 11, 2005 05:01 PM
Re: HScroll y VSroll con tsBrowse
Posted: Fri Aug 23, 2013 04:24 AM
http://www.donboscocorp.com/carlos/libsbrowse.zip
incluye:
proyecto xmate
lib para xharbour
lib para harbour
algunas correcciones a nivel de compilación y barras verticales y horizontales
Salu2

Carlos Vargas

Desde Managua, Nicaragua (CA)
noe aburto
Posts: 418
Joined: Wed Nov 26, 2008 06:33 PM
Re: HScroll y VSroll con tsBrowse
Posted: Fri Aug 23, 2013 08:09 PM

De hecho ya esta comprobado.
recompile mis apls con versiones anteriores de xh y fwh y funcionan perfecto.

No quisiera deshacerme de esta clase, es ta muy bien. tengo mis libs funcionando con ella.
Gracias, seguire buscando soluciones.

Noé Aburto Sánchez
Tec. Prog. de Sistemas. -Morelia, Mich. México.
fwh 20.06, Harbour 3.2.0, bcc 7.4
TsBrowse 9.0, TsButton 7.0, xEdit 6.1
naburtos@gmail.com, noeaburto67@hotmail.com
carlos vargas
Posts: 1789
Joined: Tue Oct 11, 2005 05:01 PM
Re: HScroll y VSroll con tsBrowse
Posted: Fri Aug 23, 2013 09:47 PM

Pregunto, Noé

ya has probado con las lib del enlace que te indique en este post?, las puse anoche luego de revisar el codigo c
y hacer algunas modificaciones.
asi mismo he habilitado las scrollbar tanto horizontales como verticales, por lo que debereria funcionar.

por favor revisalo.

Salu2

Carlos Vargas

Desde Managua, Nicaragua (CA)
noe aburto
Posts: 418
Joined: Wed Nov 26, 2008 06:33 PM
Re: HScroll y VSroll con tsBrowse
Posted: Fri Aug 23, 2013 11:01 PM

Ok, verificando. Para no tener detalles de pcode las recompilare y probare.

Noé Aburto Sánchez
Tec. Prog. de Sistemas. -Morelia, Mich. México.
fwh 20.06, Harbour 3.2.0, bcc 7.4
TsBrowse 9.0, TsButton 7.0, xEdit 6.1
naburtos@gmail.com, noeaburto67@hotmail.com
carlos vargas
Posts: 1789
Joined: Tue Oct 11, 2005 05:01 PM
Re: HScroll y VSroll con tsBrowse
Posted: Fri Aug 23, 2013 11:12 PM

okis, me comentas por favor.

salu2

Salu2

Carlos Vargas

Desde Managua, Nicaragua (CA)
noe aburto
Posts: 418
Joined: Wed Nov 26, 2008 06:33 PM
Re: HScroll y VSroll con tsBrowse
Posted: Fri Aug 23, 2013 11:36 PM

SALUDOS.

Pues en base a tu sugerencia del style, solo agrege a mi browse:

oBROWSE:nStyle := nOr( WS_CHILD, WS_BORDER, WS_VISIBLE, WS_TABSTOP, WS_HSCROLL, WS_VSCROLL )

y asunto arreglado, con los fuentes originales de tsbrowse 9.0

ya con esto quedan las barras H y V

Noé Aburto Sánchez
Tec. Prog. de Sistemas. -Morelia, Mich. México.
fwh 20.06, Harbour 3.2.0, bcc 7.4
TsBrowse 9.0, TsButton 7.0, xEdit 6.1
naburtos@gmail.com, noeaburto67@hotmail.com
carlos vargas
Posts: 1789
Joined: Tue Oct 11, 2005 05:01 PM
Re: HScroll y VSroll con tsBrowse
Posted: Sat Aug 24, 2013 02:07 PM
Noé
en los fuentes originales de tsfunc.c hay llamadas como por ejemplo
Code (fw): Select all Collapse
   HWND hWnd        = (HWND)    hb_parni( 1 ) ;
   HDC  hDC         = (HDC)     hb_parni( 2 ) ;

las cuales deben ser:
Code (fw): Select all Collapse
   HWND hWnd        = (HWND)    hb_parnl( 1 ) ;
   HDC  hDC         = (HDC)     hb_parnl( 2 ) ;

esto para que no halla problemas, por favor cambialas

salu2
Salu2

Carlos Vargas

Desde Managua, Nicaragua (CA)

Continue the discussion

Static archive · New replies & topics via GitHub Discussions