FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexAll discussionsLogin (GitHub)
Board index FiveWin para Harbour/xHarbour Problema de repintado con los TABS
Loren
Posts: 479
Joined: Fri Feb 16, 2007 10:29 AM
Problema de repintado con los TABS
Posted: Thu Mar 26, 2009 05:19 PM
Compañeros:

Tengo un TABS en un Dialogs, pero lo curioso es que cuando entro en el Dialog por primera vez, pinta perfectamente el TABS, pero cuando entro a la segunda o siguientes, el pintado del TABS lo hace incorrectamente:



Utilizo FWH 8.07 y xHarbour.
ÂżOs pasa lo mismo?

Mil gracias
LORENZO
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Problema de repintado con los TABS
Posted: Sun Mar 29, 2009 04:02 PM

Lorenzo,

Ese error posiblemente se produzca porque el brush usado como fondo se ha destruido un nĂșmero excesivo (incorrecto) de veces.

Puedes mostrarnos el cĂłdigo que usas para crear el diĂĄlogo y los tabs ?

regards, saludos

Antonio Linares
www.fivetechsoft.com
Loren
Posts: 479
Joined: Fri Feb 16, 2007 10:29 AM
Re: Problema de repintado con los TABS
Posted: Mon Mar 30, 2009 07:43 AM
Antonio, gracias por contestar.
No utilizo ningĂșn Brush y el cĂłdigo para crear el Dialog y el Tabs es simple:

Code (fw): Select all Collapse
define dialog Odlg1 resource 'ticket' title 'GESTIÓN DE FACTURAS'
 redefine listbox lisfa fields ...
 ...
 lisfa:bSeek      := {|| lisfa:DbfSeek(.T.) }
 redefine TABS otabs PROMPT "   Ordenar por NĂșmeros   ","   Ordenar segĂșn IAE   ","    Ordenar segĂșn CNAE   " OF odlg1 id 500 ACTION (ordencli(),lisfa:refresh(),lisfa:SetFocus())
 oTabs:nOption = 2
activate dialog odlg1 center on init (lisfa:gobottom(),vertimer())

A la espera de respuestas, saluda
LORENZO
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Problema de repintado con los TABS
Posted: Mon Mar 30, 2009 10:35 AM

Lorenzo,

> No utilizo ningĂșn Brush

La Clase TTabs lo usa :-)

Por favor, prueba FWH\samples\TestTab3.prg y comprueba si puedes reproducir el error, gracias

regards, saludos

Antonio Linares
www.fivetechsoft.com
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Problema de repintado con los TABS
Posted: Mon Mar 30, 2009 10:37 AM

Lorenzo,

En algĂșn momento haces oTabs:End() ? (no hay que hacerlo)

regards, saludos

Antonio Linares
www.fivetechsoft.com
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Problema de repintado con los TABS
Posted: Mon Mar 30, 2009 10:45 AM

Lorenzo,

Prueba a hacer esto:

oTabs:oBrush:nCount += 5

regards, saludos

Antonio Linares
www.fivetechsoft.com
Loren
Posts: 479
Joined: Fri Feb 16, 2007 10:29 AM
Re: Problema de repintado con los TABS
Posted: Wed Apr 01, 2009 12:26 PM
Antonio:

1.- al probar "oTabs:nCount += 5" me genera error la segunda vez que entro en el Dialogs:
Code (fw): Select all Collapse
   Error description: Error BASE/1004  Class: 'NIL' has no exported method: NCOUNT
   Args:
     [   1] = U


2.- Al probar "FWH\samples\TestTab3.prg" me genera el mismo efecto visual:


3.- En ningĂșn momento hago "oTabs:End()"

A la espera de respuestas y dando gracias por anticipado por tantas molestias, saluda

LORENZO
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Problema de repintado con los TABS
Posted: Wed Apr 01, 2009 12:43 PM

Lorenzo,

Esa imagen que has puesto no usa los Tabs estandard de FWH.

Cuales usas ? QuizĂĄs ahi este la diferencia

regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion

Static archive · New replies & topics via GitHub Discussions