To Antonio : Preview in FWH 10.12

[driessen]

Hello,

I tried out the new rpreview class in FWH 10.12.

It is great that we will be able to save reports into a word-document or a pdf-file.

I recompiled my application. At the preview box, I noticed 2 new buttons : a save-button (to save as word or pdf) and a word-button to export the report to word.

Unfortunately I got a problem. If I click on one of those 2 new buttons, my application is quited without any error-message.

Any idea what's wrong ?

Thank you very much in advance.

[nageswaragunupudi]

Seems difficult to say. Can you try with bcc582 and check if there is problem? May I know what version of MS Office you are using?
Also, can you please test with this small program compiling with bcc582 ?

Code: Select all  Expand view

#include "fivewin.ch"
#include "xbrowse.ch"

function Main()

   local oWnd, oBar

   DEFINE WINDOW oWnd
   DEFINE BUTTONBAR oBar OF oWnd 2007
   DEFINE BUTTON OF oBar ACTION XBrowse( 'CUSTOMER.DBF' )

   ACTIVATE WINDOW oWnd ON INIT XBrowse( "customer.dbf" )

return nil
 

[driessen]

I use bcc582 already for some time.

I'm using Office 2010 Professional.

The test with your small program went well.

Thanks.

[TimStone]

This is a great addition. However, it would be nice to have a way to add buttons without constantly modifying the source code. For example, I have a button to send any document as an email. It converts the preview to a PDF and then attaches it to an email.

[nageswaragunupudi]

This is a great addition. However, it would be nice to have a way to add buttons without constantly modifying the source code. For example, I have a button to send any document as an email. It converts the preview to a PDF and then attaches it to an email.

The functionality you are now asking for was already provided long back in 2009 May and its there for almost 20 months.

We can use the function RPrevUserBtns( bNewUserBtns ) --> bPrevButtons.

Please see this posting for a working sample
viewtopic.php?f=3&t=17510&p=91155&hilit=ReportExtend#p91155

[nageswaragunupudi]

I use bcc582 already for some time.

I'm using Office 2010 Professional.

The test with your small program went well.

Thanks.

Well. Then can you help to isolate the problem? Is it working with bcc582 but not with xhb or working with bcc582 with the above sample but not in a different application built with same 5.82?

[George]

I recompiled my application. At the preview box, I noticed 2 new buttons : a save-button (to save as word or pdf) and a word-button to export the report to word.
Unfortunately I got a problem. If I click on one of those 2 new buttons, my application is quited without any error-message.

I have the same problem as mentioned by Driessen.

My configuration is:
xHarbour builder
FWH 10.12
Ms-Office 2010

Regards,

George

[nageswaragunupudi]

Mr George

May I ask you, if you are compiling with xhb? And does the above simple program work well for u?

[George]

Mr. Rao
Your sample code is compiling fine, but when I press the MS-Word button, in preview screen, I get the message:
"TEST1.EXE has stopped working". No error message.
The same message is displayed if I press MS-Excel button or when I try to save the document in any format (DOC or PDF) in preview screen, otherwise the program is working OK.

I am using xHarbour Builder from xharbour.com + FWH 10.12 under Windows 7 Pro 64 bits OS.

Regards,

George

[driessen]

Antonio,

Any idea what the problem might be ?

Thanks.

[nageswaragunupudi]

Antonio,

Any idea what the problem might be ?

Thanks.

Can we see any sample code that is giving the problem?

[reinaldocrespo]

Mr. Rao;

The functionality you are now asking for was already provided long back in 2009 May and its there for almost 20 months.

We can use the function RPrevUserBtns( bNewUserBtns ) --> bPrevButtons.

Thank for the information. I didn't know that.

May I ask; Is there a way also to remove buttons? I mean; may I remove the word and pdf buttons?

Thank you;


Reinaldo.

[nageswaragunupudi]

May I ask; Is there a way also to remove buttons? I mean; may I remove the word and pdf buttons?

As of now, the answer is No.
Either we need to modify the code or much better include 10.11 rpreview.prg in our application which overrides the current rpreview.prg.

Probably, if that is our wish, FWH may provide for more customization of the buttons and bar possible in the next release.

[ukservice]

Mr Rao,

I think Preview should export to Excel, Word and PDF. In the case of PDF without using Word, because in some cases Office would not be installed.

A possible solution could be this:

Code: Select all  Expand view

Function PDFSAVE(aFiles)
Local cString
Local cDestino

Local x:=0
Local cTexto:=""


cDestino := cGetFile("Export Report (*.pdf) | *.pdf |","Save as...", NIL, nil, .T., .T. )



If Len(aFiles) = 1
   cString:="nConvert -o " + cDestino + " -quiet -out pdf -c 5 " + aFiles[1]
Else
   If File("listaemf.txt")
      Delete File listaemf.txt
   Endif

   For x=1 To Len(aFiles)
       cTexto:=cTexto + aFiles[x] + CRLF
   Next
   MemoWrit("listaemf.txt",cTexto )

   cString:="nConvert -multi -o " + cDestino + " -quiet -out pdf -c 5 -l listaemf.txt"
Endif

MsgRun("Wait","Exporting to PDF", {|| WAITRUN(cString,0 ) } )


MsgAlert("File "+ AllTrim(cDestino) +".PDF has been created.", " Export PDF ")

Return Nil

Also, I think it is time to incorporate Ribbon Bar to Preview. It looks like it was in FW 1.9.x


Thanks you for listening!!

[Bayron]

ukservice, nConvert is a great tool, but it costs 100 Euros + VAT per application, or we have to buy the developer toolkit...

As it reads in their website:
One license per one company or one application
You may not sell or distribute as a developer toolkit, or use as a server application.

Something prohibited for most programmers and costumers;

Maybe Mr. Rao can enlighten us with the direction that him and Fivetech are planning on going...