Hi,

I am getting a number of errors in preview when clicking the PDF, Email buttons etc. in FWH 13.07 & XHarbour latest.

See errors below. Has anyone else managed to fix rpreview.prg before I attempt patching it?

TIA
David

** Export to PDF **

Error description: Error BASE/1004 Class: 'NIL' has no exported method: CNAME
Args:
[ 1] = U

Stack Calls

Called from: => CNAME( 0 )
Called from: .\source\classes\RPREVIEW.PRG => (b)TPREVIEW:BUILDBUTTONBAR( 383 )
Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:CLICK( 471 )
Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:LBUTTONUP( 662 )
Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1719 )
Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:HANDLEEVENT( 1465 )
Called from: .\source\classes\WINDOW.PRG => _FWH( 3183 )
Called from: => DIALOGBOX( 0 )
Called from: .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE( 274 )

** Send by email as PDF **

Error description: Error BASE/1004 Class: 'NIL' has no exported method: CNAME
Args:
[ 1] = U

Stack Calls

Called from: => CNAME( 0 )
Called from: .\source\classes\RPREVIEW.PRG => TPREVIEW:SENDEMAIL( 1836 )
Called from: .\source\classes\RPREVIEW.PRG => (b)TPREVIEW:BUILDBUTTONBAR( 388 )
Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:CLICK( 471 )
Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:LBUTTONUP( 662 )
Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1719 )
Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:HANDLEEVENT( 1465 )
Called from: .\source\classes\WINDOW.PRG => _FWH( 3183 )
Called from: => DIALOGBOX( 0 )
Called from: .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE( 274 )

** Export to MS Word **

No Problems, it works well.

** Export to Excel **

Nothing Happens?

Hello,

Any update?.

Elvira

Prev32sp.dll and Prev32uk.dll in fwh\samples or fwh\dll, have all bitmaps OK, but not Prev32.dll

David

William,

Yes, it fails on direct previews from the printer. From reports is fine.

We are fixing it and it will be available in the next minutes. We will email you the fixed libs

Thanks

In rpreview.prg these changes are required:

remove: ACTION FWSavePreviewToPDF( Self, ::cName + ".pdf", .T. ) ;

add: ACTION FWSavePreviewToPDF( Self ) ;

in several places.

In Method SendEmail():


In source/function/prv2pdf.prg:


And finally in source/winapi/getfile.c:


We are going to publish a revised build (sorry, but it is a must). Thanks

Antonio,

At rpreview.prg, messageboxes are only in English, so they should be also in spanish:

method buildwindow()

  MsgStop( ::cResFile + " not found, imposible to continue",;
           "FiveWin Printing Error" )

method saveas()

cMsg := If( lPDF, "PDF", "Doc" ) + ;
" File to Save( " + cExt + ") |" + cExt + "|"

if Empty( cFile := cGetFile( cMsg, "File to Save", 1, CurDir(), , .t. ) )

lView := MsgYesNo( "View " + cFile + "?" )

     MsgInfo( "PDF Plugin Error" )

method sendmail()

MsgInfo( "done" ) // how to get the same focus effect ?

function convertoword()

     MsgAlert( "MS Word not installed" )
        MsgAlert( "Failed to Create Word Document" )
  MsgAlert( "There is no output for export" )

Function ToWordDocViaWriter( oPreview, aFiles, cFileType )

    MsgAlert( "There is no output for export" )
    Return nil
Endif

if ( oWriter := SunCalcObj() ) == nil
    MsgAlert( "No .Doc file manipulation software installed" )

cMsg := If( cFileType == "W", "Doc", "PDF" ) + ;
" File to Save( " + cExt + ") |" + cExt + "|"
if Empty( cFile := cGetFile( cMsg, "File to Save", 1, CurDir(), , .t. ) )

Many thanks;)))

Elvira,

Yes, right, still there are some missing names to be translated. thanks

David,

I just emailed you the libs, thanks

Now, we are going to fix what Elvira commented and then we will publish a revised build.

Dear Antonio,

Thank you.

I think this post could help you:

viewtopic.php?f=6t=23303hilit=traducirstart=15

Many thanks )

&&&

Antonio,

In order to avoid the use of many prev.dll versions (16, 32 and 64 versions, plus seveal languages), maybe you can convert the bitmaps into a function, and the dialog into a dialog with coordinates,

Also, for the texts if you implement a function like MsgStop( FWString( "Preview.dll not found" ), FWString( "Error" ) ), no more prev.dll will be needed!!.

What doi you think?.

Thank you so much .

Elvira,

thats what I am thinking about, to completely remove the preview dlls

Thanks Antonio,

But I think you sent the old libs. The error persists.

David

David,

What error is it ? the same one ?

Yes Antonio,

I'm using the libs you sent last night, but don't worry about it today and we have a fiesta tomorrow

David

PDF Button

Error description: Error BASE/1004 Class: 'NIL' has no exported method: CNAME
Args:
[ 1] = U

Stack Calls

Called from: => CNAME( 0 )
Called from: .\source\classes\RPREVIEW.PRG => (b)TPREVIEW:BUILDBUTTONBAR( 383 )
Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:CLICK( 471 )

Email Button

Error description: Error BASE/1004 Class: 'NIL' has no exported method: CNAME
Args:
[ 1] = U

Stack Calls

Called from: => CNAME( 0 )
Called from: .\source\classes\RPREVIEW.PRG => TPREVIEW:SENDEMAIL( 1836 )
Called from: .\source\classes\RPREVIEW.PRG => (b)TPREVIEW:BUILDBUTTONBAR( 388 )

Excel Button still Nothing!!

David,

Are you using Borland ?