to make easy some tables printed Iuse the class Tinforme Pubblished by josè luis ( alanit)
http://forums.fivetechsupport.com/viewt ... me#p111880
It run good and it is very easy to use
only I wish inserted new features as colors for the text ( Title , subtitle, footer ) and color for the Grid
to print each column It use simply
RptAddColumn( {bTitulo(::aTitulos,i)},,{bCampo(::aCampos,i)},::aWidth,{},{||1},.F.,,,.F.,.F.,)
to make color I use 3 type of Pen and each Pen is definited as
DEFINE PEN ::AoPen1 STYLE ::nPenstilo WIDTH val(::nPensize) COLOR ::nColore OF ::oReport
I put the row in bold ( that not run on report )
REPORT ::oReport ;
TITLE " ",::cTitulo1,::cTitulo2,iif(::cTitulo3!=NIL,::cTitulo3," ") CENTERED;
FONT ::oFont3, ::oFont2, ::oFont1 ;
PEN ::AoPen1,::AoPen2,::AoPen3; --------------not run !!!
HEADER ' ',::cTitleHeader ;
FOOTER ::cTitleFoot, "Data: "+dtoc(date())+ " Página.: "+str(::oReport:nPage,3) ;
CAPTION "" PREVIEW
.....
......
...
IF ::oReport:lCreated
IF ::lGrid
::oReport:SetPenColor(::nColore)------------> not run !!!!
::oReport:CellView()
::oReport:SetShdColor(CLR_GRAY)
ENDIF
::oReport:nTitleUpLine := RPT_SINGLELINE
::oReport:nTitleDnLine := RPT_SINGLELINE
::oReport:oTitle:aFont[2] := {|| 3 }
::oReport:oTitle:aFont[3] := {|| 2 }
::oReport:SetTxtColor(::nColoreFont1,1) ------------> not run !!!!
::oReport:SetTxtColor(::nColoreFont2,2) ------------> not run !!!!
::oReport:SetTxtColor(::nColoreFont3,3) ------------> not run !!!!
::oReport:nTopMargin := 0.1
::oReport:nDnMargin := 0.1
::oReport:nLeftMargin := 0.1
::oReport:nRightMargin := 0.1
::oReport:oDevice:lPrvModal:= .t.
ENDIF
Any solution please ?
Treport bug ?
- MdaSolution
- Posts: 401
- Joined: Tue Jan 05, 2010 2:33 pm
Return to “FiveWin for Harbour/xHarbour”
Jump to
- English Forums
- ↳ FiveWin for CA-Clipper
- ↳ FiveWin for Harbour/xHarbour
- ↳ FiveTouch
- ↳ EasyReport, EasyDialog and EasyPreview
- ↳ FiveMac / FivePhone (iPhone, iPad)
- ↳ FiveLinux / FiveDroid (Android)
- ↳ FiveWin for Pocket PC
- ↳ mod_harbour
- Foros en Español
- ↳ FiveWin para CA-Clipper
- ↳ FiveWin para Harbour/xHarbour
- ↳ FiveTouch
- ↳ EasyReport, EasyDialog y EasyPreview
- ↳ FiveMac / FivePhone (iPhone, iPad)
- ↳ FiveLinux / FiveDroid (Android)
- ↳ FiveWin para Pocket PC
- ↳ mod_harbour
- Forum italiani
- ↳ All products support
- Forum Portuguese
- ↳ All products support
- Forum German
- ↳ All products support
- General
- ↳ WhatsNew / Novedades
- ↳ Bugs report & fixes / Informe de errores y arreglos
- ↳ To do - WishList / Por hacer - Peticiones
- ↳ Utilities / Utilidades
- ↳ Off Topic / Otros temas
- Artificial Intelligence
- ↳ TensorFlow and Python examples
- ↳ TensorFlow.dll for Harbour and FWH
- ↳ latest AI news
- ↳ Building TensorFlow.dll
- ↳ AI Introduction (Harbour code and samples)