FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Consultas xBrowse
Posts: 1380
Joined: Fri Oct 14, 2005 01:28 PM
Consultas xBrowse
Posted: Mon Nov 08, 2010 03:04 PM

En primer lugar disculpen si las preguntas se refieren a temas ya tratados. Pero buscar un tema me lleva a otro...y a otro...y a otro y, me consume bastante tiempo.
Asi es como buen principiante tengo un mar de dudas y expongo las primeras

1) Como relleno el fondo del browse, aún, mas alla del área que no tiene datos

http://img101.imageshack.us/img101/5940/xbrw1.jpg

2) Si selecciono Estilo Multiselección, se puede manejar el color para que; la barra de desplazamiento sea de distinto color de la barra de selección?

http://img176.imageshack.us/img176/9272/xbrw2.jpg

3) si el browse no tiene el foco, se pude manejar el par de colores de la barra de desplazamiento?

mucha gracias

Resistencia - "Ciudad de las Esculturas"

Chaco - Argentina
Posts: 989
Joined: Thu Nov 24, 2005 03:01 PM
Re: Consultas xBrowse
Posted: Mon Nov 08, 2010 03:47 PM
MarioG wrote:
1) Como relleno el fondo del browse, aún, mas alla del área que no tiene datos
http://img101.imageshack.us/img101/5940/xbrw1.jpg


¿Probaste seteando la DATA nClrPane al color amarillo? Creo que cuando blanquea el control al pintar arma un brush con ese color.
Saludos
Carlos Mora
http://harbouradvisor.blogspot.com/
StackOverflow http://stackoverflow.com/users/549761/carlos-mora
“If you think education is expensive, try ignorance"
Posts: 1380
Joined: Fri Oct 14, 2005 01:28 PM
Re: Consultas xBrowse
Posted: Mon Nov 08, 2010 08:36 PM

Parece que por ahi no va la cosa; gracias

Resistencia - "Ciudad de las Esculturas"

Chaco - Argentina
Posts: 989
Joined: Thu Nov 24, 2005 03:01 PM
Re: Consultas xBrowse
Posted: Tue Nov 09, 2010 08:15 AM

Acabo de descubrir porque no funciona: En el XBrowse de la versión que uso hay un bug que impide que funcione correctamente.
En el método Initiate() hace

if hDlg != nil
Super:Initiate( hDlg )
::SetColor( CLR_BLACK, GetSysColor( COLOR_WINDOW ) )
endif

ignorando cualquier setcolor que hayas puesto. Lo correcto sería definir nClrPane y nClrFore en el contructor Redefine() y hacer el setcolor del Initiate con esoso colores.

Para que funcione haz el SetColor en el OnInit del ACTIVATE

ACTIVATE DIALOG oDlg ON INIT (oBrowse:SetColor( CLR_BLACK, RGB(245,253,242) ) )

lo acabo de probar y funciona.

Saludos
Carlos Mora
http://harbouradvisor.blogspot.com/
StackOverflow http://stackoverflow.com/users/549761/carlos-mora
“If you think education is expensive, try ignorance"
Posts: 1380
Joined: Fri Oct 14, 2005 01:28 PM
Re: Consultas xBrowse
Posted: Tue Nov 09, 2010 01:05 PM

Carlos;
me pongo de pié para APLAUDIR; no solo por tu interés en ayudar, sino también por tu pasión para investigar

muchas gracias!

Resistencia - "Ciudad de las Esculturas"

Chaco - Argentina

Continue the discussion