FW Preview Menu

FW Preview Menu

Postby Detlef » Thu May 05, 2022 8:54 pm

Hi all,

is there a way to avoid/hide the menu when a print preview is shown?
i already eliminated the buttons for navigation and export.
But a user could open the menu and use it's commands.

Regards, Detlef
User avatar
Detlef
 
Posts: 207
Joined: Mon Feb 07, 2022 9:54 pm

Re: FW Preview Menu

Postby Otto » Thu May 05, 2022 10:12 pm

Hello Detlef,

oPrinter:lPreview

Interesting, just yesterday I was dealing with this issue.

https://www.facebook.com/groups/modharbour.club/?multi_permalinks=1114768252410734

I tried to open the oReport with and without preview.

I didn't find out how this works with the oReport and then I chose a simple variant.
In the source code I looked and I think there it is lScreen.

Best regards,
Otto

Code: Select all  Expand view

if Setup():lReportPreview = .t.
    REPORT oReport TITLE ::cVKBereich, cTITLE, cSubTitleZeit  LEFT ;
                  FONT   oFont1,;
                  oFont2,;
                  oFont3 ;
                  PEN oPen1;
                  HEADER Setup():LizenzNehmer()," ", ALLTRIM("Erstellt: " + dtoc(date())+ " - "+time()) RIGHT;
                  FOOTER  ( "Seite: " ) + str( oReport:nPage, 3 ) ;
                  CAPTION "CAPTION";
                  CENTERED ;
                  PREVIEW


else


    REPORT oReport TITLE ::cVKBereich, cTITLE, cSubTitleZeit  LEFT ;
                  FONT   oFont1,;
                  oFont2,;
                  oFont3 ;
                  PEN oPen1;
                  HEADER Setup():LizenzNehmer()," ", ALLTRIM("Erstellt: " + dtoc(date())+ " - "+time()) RIGHT;
                  FOOTER  ( "Seite: " ) + str( oReport:nPage, 3 ) ;
                  CAPTION  "U" +  ::UniqueID  ;
                  CENTERED
endif




 
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org
https://www.facebook.com/groups/modharbour.club
********************************************************************
User avatar
Otto
 
Posts: 6310
Joined: Fri Oct 07, 2005 7:07 pm

Re: FW Preview Menu

Postby Otto » Thu May 05, 2022 10:30 pm

Detlef,
I think I misunderstood your question.
You probably need to change the RPreview classe and link in the changed one.

I do it this way for the invoice preview.

Best regards,
Otto
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org
https://www.facebook.com/groups/modharbour.club
********************************************************************
User avatar
Otto
 
Posts: 6310
Joined: Fri Oct 07, 2005 7:07 pm

Re: FW Preview Menu

Postby Antonio Linares » Fri May 06, 2022 6:04 am

regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42059
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Re: FW Preview Menu

Postby nageswaragunupudi » Fri May 06, 2022 8:32 am

Code: Select all  Expand view
TPreview():bSetUp := { |oPreview, oWnd| oWnd:oMenu:End() }


Include this code, before your PRINT oPrn PREVIEW
Regards

G. N. Rao.
Hyderabad, India
User avatar
nageswaragunupudi
 
Posts: 10619
Joined: Sun Nov 19, 2006 5:22 am
Location: India

Re: FW Preview Menu

Postby Detlef » Fri May 06, 2022 1:48 pm

Antonio Linares wrote:Dear Detlef,

Please review this:

http://fivetechsupport.com/forums/viewt ... 3f#p227931


Many thanks, Antonio.
This gave me plenty of information and a lot inspiration. :D
User avatar
Detlef
 
Posts: 207
Joined: Mon Feb 07, 2022 9:54 pm

Re: FW Preview Menu

Postby Detlef » Fri May 06, 2022 1:50 pm

nageswaragunupudi wrote:
Code: Select all  Expand view
TPreview():bSetUp := { |oPreview, oWnd| oWnd:oMenu:End() }


Include this code, before your PRINT oPrn PREVIEW

Mr. Rao,
Many thanks. That works okay now. 8)
User avatar
Detlef
 
Posts: 207
Joined: Mon Feb 07, 2022 9:54 pm


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 52 guests

cron