FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Duda al definir Font.
Posts: 601
Joined: Wed Jul 04, 2007 03:51 PM
Duda al definir Font.
Posted: Mon Jun 09, 2008 01:32 PM

Hola a todos.
Necesito imprimir en un reporte algunas líneas con color, y no puedo definir un font!!
Como debo definir un Font con Color?

Desde ya muchas gracias.

Ojeda Esteban Eduardo.

Buenos Aires - Argentina.

FWH - PellesC - DBF/CDX - ADS - Gloriosos .Bat - MySql - C# .net - FastReport

Skype: jreduojeda
Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Duda al definir Font.
Posted: Mon Jun 09, 2008 02:19 PM
#Include "FiveWin.Ch"

#Define PAD_LEFT 0
#Define PAD_RIGHT 1
#Define PAD_CENTER 2

    PRINT oPrn NAME "Relatório do Certificado do Aluno" PREVIEW MODAL

        DEFINE FONT oFontDisc NAME "Arial" SIZE 0, -10 BOLD           OF oPrn
        DEFINE FONT oFont     NAME "Arial" SIZE 0, -10 BOLD           OF oPrn

            oPrn:cmSay( 10.00,  13.70, "" + XNOMINMO,                         ;
                         oFontDisc,,                                          ;
                         CLR_BLACK,, PAD_CENTER )
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Posts: 601
Joined: Wed Jul 04, 2007 03:51 PM
Duda al definir Font.
Posted: Tue Jun 10, 2008 12:39 PM
Lo solucioné de la siguente manera:

oReport:SetTxtColor(RGB(,,),5) // ANTES DEL ACTIVATE REPORT

// Con la fucnión RGB(,,) Armo el color y 5 es el número de font definido!

oReport:StartLine()
   oReport:Say(1,"Texto",5,1)
oReport:EndLine()


De esta manera solucioné el problema!!
Karina, gracias de todos modos.
Saludos a todos. Desde Argentina, Esteban.
Ojeda Esteban Eduardo.

Buenos Aires - Argentina.

FWH - PellesC - DBF/CDX - ADS - Gloriosos .Bat - MySql - C# .net - FastReport

Skype: jreduojeda

Continue the discussion