when double on rpreview not make zoom and I have this error
before if I double clicked on the sheet the preview showed the zoomed page and you couldn't even see the lupa cursor
Antonio Linares wrote:Dear Silvio,
Fixed, please download and install FWH 23.10 again
many thanks for your great feedback
Application
===========
Path and name: C:\Work\errori\03_11_2023\ReportGen\Report.Exe (32 bits)
Size: 4,784,128 bytes
Compiler version: Harbour 3.2.0dev (r2104281802)
FiveWin version: FWH 23.10
C compiler version: Borland C++ 5.8.2 (32-bit)
Windows 10 64 Bits, version: 6.2, Build 9200
Time from start: 0 hours 2 mins 25 secs
Error occurred at: 09-11-2023, 09:50:40
Error description: Error BASE/1004 No exported method: PAGESETUP
Args:
[ 1] = A {,1960969296} length: 2
Stack Calls
===========
Called from: => PAGESETUP( 0 )
Called from: .\source\classes\RPREVIEW.PRG => CONVERTTOWORDDOC( 1887 )
Called from: .\source\classes\RPREVIEW.PRG => TPREVIEW:SAVEAS( 1788 )
Called from: .\source\classes\RPREVIEW.PRG => TPREVIEW:SENDEMAIL( 1830 )
Called from: .\source\classes\RPREVIEW.PRG => (b)TPREVIEW_BUILDBUTTONBAR( 281 )
Called from: .\source\classes\TOOLBAR.PRG => TTOOLBAR:COMMAND( 237 )
Called from: .\source\classes\WINDOW.PRG => TWINDOW:COMMAND( 1157 )
Called from: => TWINDOW:HANDLEEVENT( 0 )
Called from: .\source\classes\WINDOW.PRG => _FWH( 3651 )
Called from: => SYSREFRESH( 0 )
Called from: .\source\function\MSGRUN.PRG => STOPUNTIL( 72 )
Called from: .\source\classes\RPREVIEW.PRG => TPREVIEW:ACTIVATE( 175 )
Called from: .\source\classes\RPREVIEW.PRG => RPREVIEW( 1862 )
Called from: .\source\classes\PRINTER.PRG => (b)TPRINTER( 323 )
Called from: .\source\classes\PRINTER.PRG => TPRINTER:PREVIEW( 0 )
Called from: .\source\classes\PRINTER.PRG => PRINTEND( 2036 )
Called from: source\ut_preview.prg => PRNLABEL( 173 )
Called from: source\ut_preview.prg => ANTEPRIMA( 21 )
Called from: source\Report.prg => (b)EDIT_REPORT( 665 )
Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:CLICK( 796 )
Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:LBUTTONUP( 1083 )
Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1851 )
Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:HANDLEEVENT( 2138 )
Called from: .\source\classes\WINDOW.PRG => _FWH( 3651 )
Called from: => DIALOGBOXINDIRECT( 0 )
Called from: .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE( 307 )
Called from: source\Report.prg => EDIT_REPORT( 902 )
Called from: source\Report.prg => (b)REPORTGENERATOR( 117 )
Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:CLICK( 796 )
Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:LBUTTONUP( 1083 )
Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1851 )
Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:HANDLEEVENT( 2138 )
Called from: .\source\classes\WINDOW.PRG => _FWH( 3651 )
Called from: => DIALOGBOXINDIRECT( 0 )
Called from: .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE( 307 )
Called from: source\Report.prg => REPORTGENERATOR( 245 )
Called from: source\Report.prg => MAIN( 56 )
Antonio Linares wrote:Dear Silvio,
Could you please run this code ?
local oWord := WinWordObj()
local oDoc := oWord:Documents:Add()
oDoc:PageSetup:Orientation = 0
many thanks for your feedback
Function Anteprima(oBrowse,oRec)
local oWord := WinWordObj()
local oDoc := oWord:Documents:Add()
oDoc:PageSetup:Orientation = 0
IF oRec:Rows = 0 .AND. oRec:Columns= 0
PrnList(oBrowse,oRec)
else
PrnLabel(oBrowse,oRec)
Endif
Return nil
Return to FiveWin for Harbour/xHarbour
Users browsing this forum: Google [Bot] and 37 guests