FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Como cambio la FONT del encabezado de un GROUP?
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM
Como cambio la FONT del encabezado de un GROUP?
Posted: Wed Jun 18, 2014 09:44 PM

Gracias.

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Posts: 1344
Joined: Wed Nov 16, 2005 09:14 PM
Re: Como cambio la FONT del encabezado de un GROUP?
Posted: Thu Jun 19, 2014 12:50 AM
Hola:
En un reporte, primero debes definir los fonts que usaras
Code (fw): Select all Collapse
DEFINE FONT oFont1 NAME "ARIAL" SIZE 0,-08
     DEFINE FONT oFont2 NAME "ARIAL" SIZE 0,-08 BOLD
     DEFINE FONT oFont3 NAME "ARIAL" SIZE 0,-10 BOLD ITALIC

Luego cuando defines el report indicas que lo usaras
Code (fw): Select all Collapse
REPORT oRep TITLE "Listas de precios"  FONT  oFont1,oFont2,oFont3

Finalmente, cuando defines el grupo le asignas el font
Code (fw): Select all Collapse
GROUP oGru ON base01->marca  HEADER  base01->marca1 FONT 3;
         FOOTER "Items:"+STR(oGru:nCounter) FONT 2

Espero te sirva
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM
Re: Como cambio la FONT del encabezado de un GROUP?
Posted: Thu Jun 19, 2014 11:49 AM

Gracias.

Pero me referia al group que pones en los dialogos (el rectángulo que arriba a la izquierda podes ponerle un texto)

gracias.

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Posts: 1344
Joined: Wed Nov 16, 2005 09:14 PM
Re: Como cambio la FONT del encabezado de un GROUP?
Posted: Thu Jun 19, 2014 11:55 AM
Ah, perdon
Asi:
Code (fw): Select all Collapse
@ 10 , 10 GROUP oGroup TO 50, 50 ;
 LABEL "Prueba";
FONT oFont

o
Code (fw): Select all Collapse
REDEFINE GROUP oGroup ID 101 COLOR GetSysColor( COLOR_HIGHLIGHT ) OF oDlg ;
       FONT oFont PROMPT "Prueba"
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM
Re: Como cambio la FONT del encabezado de un GROUP?
Posted: Thu Jun 19, 2014 12:15 PM

gracias

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/

Continue the discussion