Fuentes en grupo

Fuentes en grupo

Postby txon » Mon Sep 25, 2006 7:24 pm

Hola amigos:

Necesitaba hacer un informe (TREPORT) que me permitiera cambiar la fuente de los totales de un grupo, aparentemente facil.

oInf:aColumns[1]:bTotalFont:={|| 2 }

El problema me lo encontre al intentar en un Report con dos o mas grupos, cuando queria cambiar la fuente de solo un grupo, no del resto, asi que despues de algunas horas (soy muy torpe), se me ocurrio la siguiente solucion, que pongo a vuestra disposicion por si alguien le ha sucedido lo mismo.

// Despues de la linea END REPORT poner

oInf:bEndGroup:={|oGroup| FuenteGrupo(oInf,oGroup) }

//

// Funcion para el cambio la fuente de los totales de un grupo

FUNCTION FuenteGrupo(oInf,oGroup)

Local i

FOR i=1 TO LEN(oInf:aColumns)

DO CASE
CASE oGroup:nOrder=1
oInf:aColumns[i]:bTotalFont:={|| 2 }
CASE oGroup:nOrder=2
oInf:aColumns[i]:bTotalFont:={|| 1 }
CASE oGroup:nOrder=3
oInf:aColumns[i]:bTotalFont:={|| 3 }
END CASE

NEXT i

RETURN nil

Espero que os sea de utilidad, y si alguien encuentra una solucion mas facil, por favor que la publique. :D
Un saludo
Alfonso Larrinaga
info@bsinformatica.net
User avatar
txon
 
Posts: 38
Joined: Thu Oct 13, 2005 9:38 am
Location: Santurce / Vizcaya / España

Postby Antonio Linares » Tue Sep 26, 2006 9:37 am

Alfonso,

gracias!
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42149
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 47 guests