FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour xbrowse report & Preview style
Posts: 7317
Joined: Thu Oct 18, 2012 07:17 PM
xbrowse report & Preview style
Posted: Fri Nov 11, 2022 03:23 PM


to make fast I made oThis:oLbx:report()

But if I wish print al so the lines ? (Horizontal e and vertical separators) How I can do ?

I notice on Windows 10 the style of Preview bar is not for Windows 10 but it is also 2007 style, how change it ?
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)

I use : FiveWin for Harbour March-April 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: xbrowse report & Preview style
Posted: Fri Nov 11, 2022 08:49 PM
regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 7317
Joined: Thu Oct 18, 2012 07:17 PM
Re: xbrowse report & Preview style
Posted: Fri Nov 18, 2022 01:55 PM
Antonio Linares wrote:Dear Silvio,

For the first question:

http://forums.fivetechsupport.com/viewtopic.php?f=3&t=15578&start=0&hilit=xbrowse+preview+bsetup

Antonio,
I Tried with

local bSetUp := {|oRep| oRep:CellView()}

@ 100,10 BUTTON oBtnPrint PROMPT "Stampa" of oDlg;
SIZE 80,22 ;
ACTION oBrw:Report( cTitle, .t., , bSetUp )

but I see only the horizontal lines
sample:





or
local bSetUp := {|oRep, oBrw, n| RepSetUp( oRep, oBrw, n )}
static function RepSetUp( oRep, oBrw, n )

oRep:lJoin := .t.
oRep:lSeparator := .t.
oRep:lBoxOnTotal := .t.
AEval(oRep:aColumns, {|o| o:lGrid := .t.} )

return nil





I not see vertical lines
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)

I use : FiveWin for Harbour March-April 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: xbrowse report & Preview style
Posted: Fri Nov 18, 2022 05:29 PM
Code (fw): Select all Collapse
   bSetUp   := < |oRep, Brw, n |
      if n == 2
         oRep:CellView()
         return nil
      endif
      return 2
      >

oBrw:Report( cTitle, nil, nil, bSetup )
Regards



G. N. Rao.

Hyderabad, India
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: xbrowse report &amp; Preview style
Posted: Fri Nov 18, 2022 05:29 PM
Code (fw): Select all Collapse
   bSetUp   := < |oRep, Brw, n |
      if n == 2
         oRep:CellView()
         return nil
      endif
      return 2
      >

oBrw:Report( cTitle, nil, nil, bSetup )
Regards



G. N. Rao.

Hyderabad, India
Posts: 7317
Joined: Thu Oct 18, 2012 07:17 PM
Re: xbrowse report &amp; Preview style
Posted: Sat Nov 19, 2022 09:49 AM
nageswaragunupudi wrote:
Code (fw): Select all Collapse
   bSetUp   := < |oRep, Brw, n |
      if n == 2
         oRep:CellView()
         return nil
      endif
      return 2
      >

oBrw:Report( cTitle, nil, nil, bSetup )


thanks what you mean for n?


look the image


1. the multiheader non have the line
2. there are blank pages every page created in all 7 pages of which three are blank
3.on Pdf there are not blank page, there are only 4 pages but the number of page are 1,3,5,7 I sent you the pdf
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)

I use : FiveWin for Harbour March-April 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com

Continue the discussion