colorized retport header
Posted: Sat Jun 01, 2019 7:31 am
How I can colorize the header with Hgray color ?
Hi.
Take a look at this (FW1204). Maybe can help you.
http://fivetechsupport.com/forums/viewt ... vistosidad
Regards.
FiveTech Software tech support forums
www.FiveTechSoft.com
https://fivetechsoft.com/forums/
colorized retport header
Page 1 of 1
Re: colorized retport header
Posted: Sun Jun 02, 2019 7:44 pm
Re: colorized retport header
Posted: Mon Jun 03, 2019 6:56 am
I wish use standard Fwh Report class ( for future support)
Re: colorized retport header
Posted: Mon Jun 03, 2019 9:05 am
Code: Select all
#include "fivewin.ch"
#include "report.ch"
function Main()
local oRep, oFont, oBold, oCol
USE CUSTOMER NEW SHARED
SET FILTER TO RECNO() <= 20
GO TOP
DEFINE FONT oFont NAME "TAHOMA" SIZE 0,-12
DEFINE FONT oBold NAME "VERDANA" SIZE 0,-13 BOLD
REPORT oRep PREVIEW FONT oFont, oBold
oRep:aClrText[ 1 ] := CLR_BLACK
oRep:aClrText[ 2 ] := CLR_HRED
COLUMN oCol TITLE "NAME" DATA FIELD->FIRST FONT 1
oCol:bTitleFont := { || 2 }
COLUMN oCol TITLE "CITY" DATA FIELD->CITY FONT 1
oCol:bTitleFont := { || 2 }
ENDREPORT
ACTIVATE REPORT oRep
RELEASE FONT oFont, oBold
return nil
Re: colorized retport header
Posted: Mon Jun 03, 2019 9:48 am
Some modifies Report class
Perhaps we can adopt the next release
I sent all to Antonio and Nages
Re: colorized retport header
Posted: Mon Jun 03, 2019 10:44 am
Type 1
oRep:lTitleColorized:=.t.
oRep:lDivideHeader:=.t.
type 2
oRep:lTitleColorized:=.t.
oRep:lDivideHeader:=.f.
add also
oRep:lRoundTitle:=.t. to roundbox
oRep:lBoxTitle:=.f. or only box/ fill
I sent all new methods to Antonio and Nages
oRep:lTitleColorized:=.t.
oRep:lDivideHeader:=.t.
type 2
oRep:lTitleColorized:=.t.
oRep:lDivideHeader:=.f.
Code: Select all
#include "fivewin.ch"
#include "report.ch"
function Main()
local oRep, oFont, oBold, oCol
USE CUSTOMER NEW SHARED
SET FILTER TO RECNO() <= 20
GO TOP
DEFINE FONT oFont NAME "TAHOMA" SIZE 0,-12
DEFINE FONT oBold NAME "VERDANA" SIZE 0,-13 BOLD
REPORT oRep PREVIEW FONT oFont, oBold
oRep:aClrText[ 1 ] := CLR_BLACK
oRep:aClrText[ 2 ] := CLR_HRED
oRep:lTitleColorized:=.t.
// oRep:nClrTitle :=CLR_BLUE
oRep:lDivideHeader:=.f.
COLUMN oCol TITLE "NAME" DATA FIELD->FIRST FONT 1
oCol:bTitleFont := { || 2 }
COLUMN oCol TITLE "CITY" DATA FIELD->CITY FONT 1
oCol:bTitleFont := { || 2 }
ENDREPORT
ACTIVATE REPORT oRep
RELEASE FONT oFont, oBold
return nil
add also
oRep:lRoundTitle:=.t. to roundbox
oRep:lBoxTitle:=.f. or only box/ fill
I sent all new methods to Antonio and Nages
Re: colorized retport header
Posted: Mon Jun 03, 2019 11:06 am
nice
Re: colorized retport header
Posted: Mon Jun 03, 2019 11:26 am
perhaps we can add it on Group and total but I not tried