Search found 108 matches: orep

Return to advanced search

oBrw:report() ... control fonts

oRep:aFont already has two fonts built by the browse object oRep:aFont[ 1 ] is Tahoma size 0,-8 oRep:aFont[ 2 ] is Tahoma size 0,-8 bold I need to have another font I made oFontCopy := TFont():New("TAHOMA",0,-108,.F.,,180,,,,,,,,,,oRep:oDevice) ...
by Silvio.Falconi
Wed Dec 13, 2023 11:57 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: oBrw:report() ... control fonts
Replies: 0
Views: 294

Add a line on report from xbrowse (NO HTML)

... line after the text "Provincia:AG" I create the prints using xbrowse's method Report()  oBrw:Report( cTitle, , , ;         { |oRep, oBrw| MySetUp( oRep, oBrw, oDbf,aGroup,nGroup,lEject,aCampi ) } )  on MySetup function I insert the Group sintax AAdd(oRep:aGroups,trGroup():New( ...
by Silvio.Falconi
Tue Dec 12, 2023 2:39 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: Add a line on report from xbrowse (NO HTML)
Replies: 2
Views: 253

add a line in the print report

... line after the text "Provincia:AG" I create the prints using xbrowse's method Report()  oBrw:Report( cTitle, , , ;         { |oRep, oBrw| MySetUp( oRep, oBrw, oDbf,aGroup,nGroup,lEject,aCampi ) } )  on MySetup function I insert the Group sintax AAdd(oRep:aGroups,trGroup():New( ...
by Silvio.Falconi
Tue Dec 12, 2023 9:49 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: add a line in the print report
Replies: 8
Views: 399

Re: Calculate total pages

thanks Rao Would this also work if I use the browse setup? example oBrw:Report( cTitle, , , ; { |oRep, oBrw| MySetUp( oRep, oBrw, oDbf,aGroup,nGroup,lEject,aCampi ) } ) static function MySetUp( oRep, oBrw, oDbf,aGroup,nGroup,lEject,afields ) local cFooter := "Progetto ...
by Silvio.Falconi
Tue Nov 28, 2023 8:39 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: Calculate total pages
Replies: 32
Views: 5507

Re: Calculate total pages

... Yes Where you write page number, write something like this: "Page : " + cValToChar( nPage ) + ;            " of " + oRep:oDevice:cLastPage Nages, There is something not run ok on Treport https://i.postimg.cc/WzYHVtyx/kk.png I made oRep:oTitle := TrLine():New( ...
by Silvio.Falconi
Mon Nov 27, 2023 8:13 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: Calculate total pages
Replies: 32
Views: 5507

Number Total Pages

How I can calculate on Report ( class Treport) the total number of pages ? local nTotalpages:= ? oRep:oTitle := TrLine():New( {{|| cf(date())+"- Pagina : "+Str(oRep:nPage,3)+"/"+Str(nTotalpages,3)} }, oRep, 2 ) I tried also with nTotalpages:=:= Round(oRep:nCount/oRep:nPageSize,0) ...
by Silvio.Falconi
Fri Nov 17, 2023 3:18 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: Number Total Pages
Replies: 2
Views: 194

Making GroupReport from Xbrowse

... setup I go to print the groups If nGroup >0           IF lEject           AAdd(oRep:aGroups,trGroup():New( bCampo2( afields, nGroup,oDbf ),; //campo           {|| aGroup[nGroup]+" ...
by Silvio.Falconi
Mon Oct 30, 2023 9:38 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: Making GroupReport from Xbrowse
Replies: 0
Views: 276

Number Total Pages

on a Report from Xbrowse I use a function I wisth show the total pages I tried with LTrim( Str( Len( oRep:oDevice:oDevice:aMeta ) ) ) but not run oBrw:Report( cTitle, , , ; { |oRep, oBrw| MySetUp( oRep, oBrw, oDbf,aGroup,nGroup,lEject,aFields ) }) function MySetUp( oRep, ...
by Silvio.Falconi
Fri Jun 23, 2023 9:12 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: Number Total Pages
Replies: 2
Views: 257

Re: Effect Pjama on Treport ( from Xbrowse)

hi Silvio try this       ::oBrw:Report( ::cTitolo, .T., .T., { |oRep, oBrw| ::ReportGes( oRep, oBrw ) } )*-----------------------------------------------------------------------------------------------------------------------METHOD ...
by Silvio.Falconi
Thu May 11, 2023 6:22 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: Effect Pjama on Treport ( from Xbrowse)
Replies: 5
Views: 288

Re: Group on Report ( from xbrowse)

Dear Silvio, > AAdd(oRep:aGroups,trGroup():New({||"oDbf:"+(afields[nGroup])},{||""},{||"Total"},{|| 1 },.t.,oRep)) AAdd(oRep:aGroups,trGroup():New( &( "{||oDbf:" + (afields[nGroup])}" ...
by Silvio.Falconi
Fri May 05, 2023 12:01 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: Group on Report ( from xbrowse)
Replies: 4
Views: 235

Re: Group on Report ( from xbrowse)

Dear Silvio,

> AAdd(oRep:aGroups,trGroup():New({||"oDbf:"+(afields[nGroup])},{||""},{||"Total"},{|| 1 },.t.,oRep))

AAdd(oRep:aGroups,trGroup():New( &( "{||oDbf:" + (afields[nGroup])}" ),{||""},{||"Total"},{|| 1 },.t.,oRep))
by Antonio Linares
Fri May 05, 2023 10:01 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: Group on Report ( from xbrowse)
Replies: 4
Views: 235

group on oBrw:Report

... a combobox the user selects the index oDbf:setorder(nGroup) oDbf:gotop() nGroup is a number aGroup := {nGroup} oBrw:Report( cTitle, , , ; { |oRep, oBrw| MySetUp( oRep, oBrw, oDbf ) }, aGroup ) static function MySetUp( oRep, oBrw, oDbf )   local  cFooter  := "footer title"  ...
by Silvio.Falconi
Tue May 02, 2023 8:36 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: group on oBrw:Report
Replies: 1
Views: 137

Re: bsetup of Report

... last result but i still have problems 1) the stripes don't have the pajama effect, they are all grey 2) does not recognize "Page : "+Str(oRep:nPage,3) 3) the title line needs to be narrower oBrw:Report( "Stampa elenco", nil, nil, { | oRep, oBrw, n| RepSetUp( oRep, oBrw, n ) ...
by Silvio.Falconi
Wed Apr 26, 2023 10:49 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: bsetup of Report
Replies: 1
Views: 152

bsetup of Report

... I would simply like to have simple and not double lines, a test on the left and the date and page number/pages on the right bSetUp := < |oRep, Brw, n | if n == 2 oRep:bSkip := {|| (IF(!oDbf:Eof(),oDbf:Skip(),nil),; IF(oRep:nCounter % 2 =1 , oRep:lShadow :=.f.,oRep:lShadow :=.t.))} return ...
by Silvio.Falconi
Wed Apr 26, 2023 9:20 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: bsetup of Report
Replies: 1
Views: 152

Re: Help for xbrowse report bSetUp

Silvio: En el metodo Report de Xbrowse, oRep:bSkip lo sobreescribe con esto: if Len( ::aSelected ) > If( ::lMultiSelect, 1, 0 )       Eval( ::bBookMark, ::aSelected[ 1 ] )       nRows        := Len( ::aSelected ...
by Silvio.Falconi
Sun Mar 19, 2023 9:59 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: Help for xbrowse report bSetUp
Replies: 3
Views: 375
Next

Return to advanced search