Para Antonio, 3 temas:

Para Antonio, 3 temas:

Postby jll-fwh » 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:
Image

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:
Image

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)
Image

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
User avatar
jll-fwh
 
Posts: 408
Joined: Fri Jan 29, 2010 8:14 pm
Location: Meliana - Valencia

Re: Para Antonio, 3 temas:

Postby jll-fwh » 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
User avatar
jll-fwh
 
Posts: 408
Joined: Fri Jan 29, 2010 8:14 pm
Location: Meliana - Valencia

Re: Para Antonio, 3 temas:

Postby MarioG » Tue Apr 03, 2012 1:01 pm

Yo lo hago así:
Code: Select all  Expand view
...
      ::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
User avatar
MarioG
 
Posts: 1380
Joined: Fri Oct 14, 2005 1:28 pm
Location: Resistencia - Chaco - AR

Re: Para Antonio, 3 temas:

Postby jll-fwh » Tue Apr 03, 2012 2: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
User avatar
jll-fwh
 
Posts: 408
Joined: Fri Jan 29, 2010 8:14 pm
Location: Meliana - Valencia

Re: Para Antonio, 3 temas:

Postby MarioG » Tue Apr 03, 2012 2: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 :wink:
La data :bLClickHeader es lo que uso para la accion citada
Resistencia - "Ciudad de las Esculturas"
Chaco - Argentina
User avatar
MarioG
 
Posts: 1380
Joined: Fri Oct 14, 2005 1:28 pm
Location: Resistencia - Chaco - AR

Re: Para Antonio, 3 temas:

Postby Antonio Linares » Tue Apr 03, 2012 3: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
User avatar
Antonio Linares
Site Admin
 
Posts: 41314
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 94 guests