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
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
TPreview():bSetUp := { |oPreview, oWnd| oWnd:oMenu:End() }
Antonio Linares wrote:Dear Detlef,
Please review this:
http://fivetechsupport.com/forums/viewt ... 3f#p227931
nageswaragunupudi wrote:
- Code: Select all Expand view
TPreview():bSetUp := { |oPreview, oWnd| oWnd:oMenu:End() }
Include this code, before your PRINT oPrn PREVIEW
Return to FiveWin for Harbour/xHarbour
Users browsing this forum: No registered users and 52 guests