FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Para Antonio, 3 temas:
Posts: 408
Joined: Fri Jan 29, 2010 08:14 PM
Para Antonio, 3 temas:
Posted: Sun Apr 01, 2012 12:26 PM
Hola Antonio:

Estoy usando ahora: Libreria: FWH/FWH1109 + Harbour 3.1.1 + Borland C++ 5.8.2

Tengo 3 puntos a comentar:

1.- Porque cuando se crea un grupo en la cabecera del xBrowse la separaci贸n del grupo lo pinta en azul claro en vez de pintarlo en gris claro como en las cabeceras sin grupos? hay alguna DATA que contenga el color a pintar en los grupos? ( ver imagen )
Imagen:


2.- Con la versi贸n FWH1109 todav铆a hay problemas con las barras de menus SIN la clausula 2007, cuando entras varias veces en los procesos, de repente se cambia el FONT del boton. ( ver imagen ).
Nota: Este problema ya te lo comente y me enviastes las correcciones pero sigue igual. El hilo era este: viewtopic.php?f=6&t=22332&p=118912&hilit=tbar#p118912
Imagen:


3.- Hay alguna forma de poder cambiar el color de las cabeceras del xBrowse cuando se pulsa sobre una de las cabeceras, no todas, solo la cabecera que se a hecho click sobre ella? Por defecto se pinta en azul, pero est茅ticamente no queda muy bien.( ver imagen)


Un saludo
JLL
Libreria: FWH/FWH1109 + Harbour 5.8.2 + Borland C++ 5.8.2
Editor de Recursos: PellecC
ADA, OURXDBU
S.O: XP / Win 7 /Win10
Blog: http://javierlloris.blogspot.com.es/
e-mail: javierllorisprogramador@gmail.com
Posts: 408
Joined: Fri Jan 29, 2010 08:14 PM
Re: Para Antonio, 3 temas:
Posted: Tue Apr 03, 2012 12:14 PM

Hola Antonio:

Comentarte lo siguiente: sobre el punto 2 que se cambiaba el tama帽o y forma del texto de los botones en una barra con estilo 2007, pues si le asignas un fuente tipo "Arial" funciona bien, pero en cambio con otro tipo de fuente NO. Aunque no es el tipo de fuente que uso yo para los botones, de esta forma al menos funciona OK, no estar铆a mal de todos modos mirar la clase a ver porque ocurre esto.

Respecto a los puntos 1 y 3 algo al respecto?

Un saludo
JLL

Libreria: FWH/FWH1109 + Harbour 5.8.2 + Borland C++ 5.8.2
Editor de Recursos: PellecC
ADA, OURXDBU
S.O: XP / Win 7 /Win10
Blog: http://javierlloris.blogspot.com.es/
e-mail: javierllorisprogramador@gmail.com
Posts: 1380
Joined: Fri Oct 14, 2005 01:28 PM
Re: Para Antonio, 3 temas:
Posted: Tue Apr 03, 2012 01:01 PM
Yo lo hago as铆:
Code (fw): Select all Collapse
...
聽 聽 聽 ::oBrwIns:aCols[nCol]:oHeaderFont:= ::hFont["SysFontB"]
聽 聽 聽 ::oBrwIns:bClrHeader := {|| if( Empty( ::oBrwIns:aCols[nCol]:cOrder ), { CLR_BLACK, GetSysColor( COLOR_BTNFACE ) }, ;
聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽{ CLR_GREEN, GetSysColor( COLOR_BTNFACE ) } ) }

聽 聽 聽 ::oBrwIns:Refresh()
...

Pero solo consigo que cambie el Font, no as铆 el color que siempre lo mantiene negro
FWH 1109
Resistencia - "Ciudad de las Esculturas"

Chaco - Argentina
Posts: 408
Joined: Fri Jan 29, 2010 08:14 PM
Re: Para Antonio, 3 temas:
Posted: Tue Apr 03, 2012 02:10 PM

Hola Mario:

La data :bClrHeader es para poner el color en las cabeceras, pero no es la que aplica el color a la cabecera que se ha hecho click sobre ella.

En la imagen que puse, cuando se hace click sobre la columna fecha ( imagen del punto 3 ), dicha cabecera se repinta de azul, y yo necesito cambiar ese color a otro.

La data :bLClickHeader se usa para hacer una acci贸n cuando se hace click sobre la columna en cuesti贸n.

Muchas gracias por responder mario;
Un saludo
JLL

Libreria: FWH/FWH1109 + Harbour 5.8.2 + Borland C++ 5.8.2
Editor de Recursos: PellecC
ADA, OURXDBU
S.O: XP / Win 7 /Win10
Blog: http://javierlloris.blogspot.com.es/
e-mail: javierllorisprogramador@gmail.com
Posts: 1380
Joined: Fri Oct 14, 2005 01:28 PM
Re: Para Antonio, 3 temas:
Posted: Tue Apr 03, 2012 02:51 PM
jll-fwh wrote:La data :bClrHeader es para poner el color en las cabeceras, pero no es la que aplica el color a la cabecera que se ha hecho click sobre ella.

La data :bLClickHeader se usa para hacer una acci贸n cuando se hace click sobre la columna en cuesti贸n.

gracias a vos JLL, ahora ya se porque no se pinta mi header :-)
La data :bLClickHeader es lo que uso para la accion citada
Resistencia - "Ciudad de las Esculturas"

Chaco - Argentina
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
Re: Para Antonio, 3 temas:
Posted: Tue Apr 03, 2012 03:05 PM

JLL,

La DATA bClrHeader debe retornar un array de 3 elementos y el tercer valor es para pintar las l铆neas horizontales de la cabecera. En el M茅todo PaintHeader() est谩 lo siguiente:

aColors := Eval( ::bClrHeader )

y m谩s abajo:

hHeaderPen := CreatePen( PS_SOLID, 1, aColors[ Min( 3, Len( aColors ) ) ] ) // 3 茅lementos o menos

y algo m谩s abajo:

DrawHorz( hDC, nRow + nGrpHt, nGrpFrom - 2, aCols[ nFor + 1 ] - 2, hHeaderPen )

prueba asi si puedes corregirlo, gracias

regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion